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Appendix A 

[0282] Appendix A illustrates semantic types that may be supported and their 
corresponding adaptive template names. For example, the Pipelined semantic type is made up 
of, in this order, the map keys the pipe state and the index_fact adaptive templates. The 
example pre-parsed and post parsed SQL adaptive templates are then provided. 

[0283] As mentioned previously, the use of the semantic types significantly reduces the 
amount of work needed to implement the datamart 150. By selecting a semantic type for a 
particular fact table or dimension table, the consultant automatically selects the corresponding 
pre-parsed SQL adaptive templates. The selected adaptive templates are then automatically 
converted into post parsed SQL statements that include the schema specific information for the 
datamart 150. Additionally, these post parsed SQL statements include the SQL for accessing and 
manipulating the datamart 150 tables. 

semantictypename adaptivetemplatename 


Pipelined 

map_keys 

Pipelined 

pipe_state 

Pipelined 

index_fact 

Pipelined/Unjoined 

upd_unj 

Pipelined/Unjoined 

map_keys 

Pipelined/Unjoined 

pipe_state 

Pipelined/Unjoined 

indexfact 

Slowly Changing Dimensions 

insert_dim 

Slowly Changing Dimensions 

indexdim 

Transactional 

map_keys 

Transactional 

load_trans 

Transactional 

ren^trans 

Transactional 

index_fact 

T ransactional/Inventory 

map_keys 

T ransactional/Inventory 

load_trans 

T ransactional/Inventory 

inv_adjust 

T ransactional/Inventory 

index_fact 

T ransactional/Inventory/ForceZero 

map_keys 

T ransactional/Inventory/ForceZero 

load_trans 

Transactional/Inventory/ForceZero 

force_zero 

Transactional/Inventory/ForceZero 

inv_adjust 
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semantic_type_name 

Transactional/Inventory/ForceZero 

Transactional/Inventory/ForceZero/Unjoined 

Transactional/Inventory/ForceZero/Unjoined 

Transactional/Inventory/ForceZero/Unjoined 

Transactional/Inventory/ForceZeroAJnjoined 

Transactional/Inventory/ForceZero/Unjoined 

Transactional/Inventory/ForceZero/Unjoined 

T ransacti onal/In ventory/Unj oined 

T ransactional/Inventory/Unj oined 

Transactional/Inventory/Unjoined 

Transactional/Inventory/Unjoined 

Transactional/Inventory/Unjoined 

Transactional/Statelike 

Transactional/Statelike 

Transactional/Statelike 

Transactional/Statelike 

Transactional/Statelike/ForceClose 

Transactional/Statelike/ForceClose 

Transactional/Statelike/ForceClose 

Transactional/Statelike/ForceClose 

Transactional/Statelike/ForceClose 

Transactional/Statelike/ForceClose/Unjoined 

Transactional/Statelike/ForceClose/Unjoined 

Transactional/Statelike/ForceClose/Unjoined 

Transactional/Statelike/ForceClose/Unjoined 

Transactional/Statelike/ForceClose/Unjoined 

Transactional/Statelike/ForceClose/Unjoined 

Transactional/Statelike/Unjoined 

Transactional/Statelike/Unjoined 

Transactional/Statelike/Unjoined 

Transactional/Statelike/Unjoined 

Transactional/Statelike/Unjoined 

T ransactional/Unj oined 

T ransactional/U nj oined 

Transactional/Unjoined 

Transactional/Unjoined 

T ransactional/Unj oined 


adaptivetemplatename 

index_fact 

iipd_unj 

map_keys 

load_trans 

forcezero 

inv_adjust 

indexfact 

upd_unj 

map_keys 

load__trans 

inv_adjust 

index_fact 

mapkeys 

load_trans 

load_state 

index_fact 

map^keys 

load_trans 

force_close 

loadstate 

index_fact 

u pd_unj 

map_keys 

load_trans 

forceclose 

load_state 

index_fact 

updunj 

map_keys 

load_trans 

load_state 

index_fact 

upd_unj 

map_keys 

load_trans 

rentrans 

index fact 


The following are the pre-parsed pseudo-SQL source for the adaptive templates. 
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— #TEMPLATE_BEGIN# force_close 

* ......................... *******" **/ 

-- Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

-- force_close 

-- Close out deleted orders - those that no longer appear in the 
— staging table 

-- SEE SAFETY VALVE BELOW 



— Delete temporary tables 


--#BLOCK_BEGIN# DropTemps 
$ $DDL_BEGIN 

$ $DROP_ TABLE IF_EXISTS [ $$ FCTTBL [ ] _FC] 
$$DDL END 
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MAX(f.seq) + 1 seq 
f.SSDIMKEYR 01 
f .$$DIMKEYR~02 
f . SSDIMKEYR 03 
f.$$DIMKEYR~04 
f .$$DIMKEYR~05 
£ . SSDIMXEYR 06 
f .$$DIMKEYRJ)7 
f . SSDIMKEYR 08 
f ,$$DIMKEYR“09 
f.$$DIMKEYR 10 
f . $ $ DEGKEY_01 
£ . $ $DEGKEY 02 
f . $$DEGKEY~03 


-SUM ( f 
-SUM ( f 
-SUM ( £ 
-SUM ( f 
-SUM ( £ 
-SUM ( f 
-SUM ( f 
-SUM ( f 
-SUM ( f 
-SUM ( £ 
-SUM ( £ 
-SUM ( £ 
-SUM ( £ 
-SUM ( f 
-SUM ( f 
-SUM { £ 
-SUM ( f 
—SUM ( f 
-SUM ( f 
-SUM ( £ 
-SUM ( f 
-SUM ( f 
-SUM ( £ 
-SUM ( f 


.SSFCTCOL 
.SSFCTCOL 
. SSFCTCOL 
. SSFCTCOL 
, $ $ FCTCOL 
. SSFCTCOL 
$$ FCTCOL 
$ $ FCTCOL 
$ SFCTCOL 
$ SFCTCOL 
,$ SFCTCOL 
$ SFCTCOL" 

ssfctcol" 

$ SFCTCOL" 
SSFCTCOL" 

ssfctcol" 

ssfctcol" 

ssfctcol" 

ssfctcol" 

ssfctcol" 

ssfctcol" 

ssfctcol" 

ssfctcol" 

ssfctcol" 


001 ) 

002 ) 

003) 

004) 

005) 

006) 

007) 

008) 

009) 

010 ) 

011) 

012 ) 

013) 

014) 

015) 

016) 

017) 

018) 

019) 

020 ) 
021 ) 
022 ) 

023) 

024) 


SSFCTCOL 001 
$$FCTCOL”002 
SSFCTCOL 003 
$SFCTCOL~004 
SSFCTCOL 005 
SSFCTCOLJJ0 6 
S $ FCTCOL_0 0 7 
$$FCTCOL_008 
S $ FCTCOL_0 0 9 
SSFCTCOL 010 
$$FCTCOL~011 
$ $ FCTCOL__0 1 2 
$ $ FCTCOL_01 3 
$ $ FCTCOL_01 4 
SSFCTCOL 015 
$$FCTCOL~016 
$ S FCTCOL_0 1 7 
$$FCTCOL_018 
SSFCTCOL 019 
S $ FCTCOL~0 2 0 
$$FCTCOL_021 
SSFCTCOL 022 
$$ FCTCOL ~02 3 
SSFCTCOL 024 


$$SELECT_INTO BODY [SSFCTTBL ()_FC) 

FROM 

$ S FCTTBL [ ) S $ CURR f 

WHERE 

NOT EXISTS 

(SELECT 1 FROM SSFSTGTBL [ ] MAP S WHERE s.iss 

GROUP BY 

f.iss, t 

f . ss_key 

, f.SSDIMKEYR 01 

, f .S$DIMKEYR”02 

, £.$SDIMKEYR_03 

, f.SSDIMKEYR 04 

, f . $$DIMKEYR~05 

, f . $$DIMKEYR_06 

, £. $SDIMKEYR_07 

, f . S$DIMKEYR_08 

, f .SSDIMKEYR_09 

, f .S$DIMKEYR_10 

, f.SSDEGKEY 01 

, £ . $$DEGKEY~02 

, f . S S DEGKEY_0 3 

HAVING 

( 

<SUM(f .SSFCTCOL 001) <> 0) 

OR (SUM ( f . $ $ FCTCOL~002 ) <> 0) 

OR (SUM ( f . $$FCTCOL_003 ) <> 0) 

OR (SUM.(f ,S$FCTCOL_004) <> 0) 

OR ( SUM (£. SSFCTCOL 005) <> 0) 

OR ( SUM ( f . $ $ FCTCOL"*0 06) <> 0) 


«=* f.iss AND s.ss_ key » f 


. ss_key) 
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$ $ FSTGTBL l J _MAP s~, bu 3 _proces 3 b ~~ " ' 

WHERE 

((s.dacekey >« (SELECT MAX (date key) FROM $$FCTT 8 L{ ] SSCURR f WHERE 

s.iss — f.iss AMO s ,53_key - f .ss_key and 

s ■ transtypo key — f . trana type_key ) ) 

OR NOT EXISTS (SELECT * FROM SSFCTTBL [J S SCURR f WHERE 
s.iss — f , i 33 AND 3 . S3_key — f.ss_key AND 
s . trana type_key - f . tcan3type_key ) ) 

AND a.i ke y - (SELECT MAX(C.ikey) FROM $$ FSTGTBL (] _MAP t WHERE 

s.lss — t.lss AN D 
s.39_key *■ t.ss^key AND 

s. date_key — t.date_koy AND 

t . proce ss_key — b.process_key) 

AND 

s.proce33_key — b.procesa_key AND b.procoss^name — 'LoadState' 

— # BLOCK ENDS MakeMFL 

— Index MFL cable Cor later queries 

* * * ******** 

# BLOCK BEGIN# IndexMFL 

5 $ DDL BEGIN 

SSDDL_EXEC( 

CREATE INDEX XS $ FCTTBL [ ) MFL ON $$FCTTBL(J MFL 

( 

iss, as_key, date_key 

> 

1 

$ 5 DDL_END 

#BLOCK_END« IndexMFL 



— Get oldest state rows for each uni qu o sskey 

— we need to treat the first entry Cor each order 

— in the staging table separately from all others, since 

— only the first entry needs to be compared with 

— already existing fact entry rows to create transactions. 

— All subsequent dates Cor that order in the Fact table 

-- can be delta'd with other staging table entries - see the 
— - section below on Pairwise deltas. 

— MFL should be indexed 

1ST: The Cirst record for each iss, sa key 

* ******** ***** * * / 

# BLOCK BEGIN# Make 1ST 

$ S SELECT INTO BEGIN [$$ FCTTBL ( )_1ST) 

SELECT 

S . * 

$ $ SELECT INTO BODY [ $$ FCTTBL ( ) 1ST) 

FROM — 

$ S FCTTBL ( ]_MFL a 

WHERE 

s • date key - (SELECT MIN (date key) FROM $$ FCTTBL [) _MFL t WHERE 

s.iss — t.iss AND s.as_key — t.ss_key> 

# BLOCK_END# MakelST 

**** r ^*.**.*» * ******** 

— Index 1ST for later queries 

/*** * ****** ********* ****..**.»...*..*..**..*.*/ 

# BLOCK BEGIN© IndexlST 
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$$DDl_BEGIN “ ' 

$$DDL_EXEC{ 

CREATE UNIQUE INDEX XPK$$FCTTBL H_1ST ON $ $ FCTTBL [} _1ST 
iss, ss_key 

> 

) 

$$DDL_END 

--&BLOCK_END# IndexlST 

/*****•'**** + *****************★★*******************************★**-****♦*****#****•■#**/ 

— Insert negative BOOKS for changed dim keys 

— This query will add up all existing Books and Loss's 

— for this order and the net facts will be cancelled out 

— with the old Dimension keys. Note that an invariant of this 

— procedure is that only one set of dimensions at a time 

— can have non-zero facts. 

-- Fact table Should be indexed 

— HAVING Clause is needed to prevent changing of dimensions 

— on fully shipped order from causing a transaction - no sense 

— creating fact rows with all zero's in them 

-- Note that we increment the sequence number just in case 

-- this new transaction occurs on the same date as the last 

— existing one in the fact table - to avoid index errors 

-- IL: InsertLost 

/ft*********#********************#**********************#*#***#**********************/ 

— # BLOCK_BEGIN# MakelL 

$$ SELECT INTO BEGIN {$$ FCTTBL (] _IL] 

SELECT ~ ~ 

s.iss, 
s . ss_key, 
s.date_key, 
s . transtype_key, 

MAX { f . seq) + 1 seq 
f . $$DIMKEYRJ)1 
f .$$DIMKEYR_02 
f.$$DIMKEYR 03 
f .$$DIMKEYR~04 
f .$$DIMKEYR_05 
f .$$DIMKEYR_06 
f .$$DIMKEYR_07 
f .$$DIMKEYR_08 
f .$$DIMKEYR_09 
f.SSDIMKEYR 10 
f .$$DEGKEY_01 
f . $ $ DEGKEY~02 
f . $$DEGKEY_03 

- SUM ( f . $ $ FCTCOL 001) $$FCTCOL_001 
-SUM ( f . $$FCTCOL~G02 ) $$FCTCOL_002 
-SUM(f .$$FCTCOL_003) $$FCTCOL_003 

- SUM ( f . $ $ FCTCOL_0 0 4 ) $$FCTCOL_004 
-SUM{f .$$FCTCOL_005) $$FCTCOL_005 
-SUM ( f . $$FCTCOL_006) $$FCTCOL_006 
-SUM ( f . $$FCTCOL__007 ) $$FCTCOL 007 

- SUM ( f . $ $ FCTCOL_0 0 8 ) $$FCTCOL”008 
-SUM(f .$$FCTCOL_009) $$FCTCOL_009 
-SUM(f .$$FCTCOLJ)10) $$FCTCOLJ310 
-SUM ( f . $ $FCTCOL_0 1 1 ) $$FCTCOL_011 
-SUM ( f . $$FCTCOL_012 ) $$FCTCOL_012 
-SUM(f ,$$FCTCOL_013) $$FCTCOL013 
-SUM { f . $$FCTCOL__01 4 ) $$ FCTCOL~01 4 

-SUM ( f . $ $ FCTCOL 015) $$ FCTCQL~015 



-SUM(f . $$FCTCOL_016) 
-SUM( f. $$ FCTCOL _017) 
-SUM ( f . $$ FCTCOL_018 ) 
-SUM ( f . $ $ FCTCOL_0 1 9 ) 
-SUM ( f . $ $ FCTCOL_0 2 0 ) 
-SUM { f . $ $ FCTCOL_021 ) 
-SUM ( f . $$ FCTCOL_022 ) 
-SUM ( f . $ $ FCTCOL_023 ) 
-SUM ( f . $ $FCTCOL_024 ) 


$$ FCTCOL 016 
$ $ FCTCOL~0 1 7 
$ $ FCTCOL__0 1 8 
$$FCTCOL_019 
$$FCTCOL_020 
$$FCTCOL_021 
$$FCTCOL_022 
$$FCTCOL_023 
$$ FCTCOL 024 


$ $SELECT_INTO_BODY [$$FCTTBL ( ) _IL J 
FROM 

$5 FCTTBL { ) 1ST S, $$FCTTBL ( ] $$CURR f 

WHERE 

s.iss » f.iss AND s.ss_key ■= f.ss_key 

AND 

{ (s.$$DIMKEYR_06 <> f . $ $DIMKEYR_0 6 ) OR 
(S.$$DIMKEYR_05 <> f . $5 DIMKEYR 05) OR 
(S.$$DIMKEYR_07 <> f . $$DIMKEYR~07 > OR 
(S.$$DIMKEYR_04 <> f . $$DIMKEYR_04 ) OR 
(S.$$DIMKEYR_08 <> f . $$DIMKEYR_08 ) OR 
(S.$$DIMKEYR_03 <> f . $$DIMKEYR_03 ) OR 
{S.$$DIMKEYRJ)9 <> f . $$DIMKEYR_09 ) OR 
(S.$$DIMKEYR_02 <> f . $$DIMKEYR_02 ) OR 
(s.S$DIMKEYR_10 <> f . $$DIMKEYR_10 ) OR 
(s.$$DIMKEYR_01 <> f . $$DIMK£YR_01 ) ) 

GROUP BY 

s . iss, 
s , ss_key, 
s.date_key, 
s . transtype_key 
, f ,$$DIMKEYR_01 

, f .$$DIMKEYR_02 

, f .$$DIMKEYR_03 

, f . $$DIMKEYR_04 

, f .$$DIMKEYR_05 

, f . $$DIMKEYR_06 

, f ,$$DIMKEYR_07 

, f .$$DIMKEYR_Q8 

, f .$$DIMKEYR_09 

, f .$$DIMKEYR_10 

, f . $ $ DEGKE Y_0 1 

, f . $ $ DEGKEY_02 

, t .$$DEGKEY_03 

HAVING 

MIN ( f . transtype_key) = s. transtype key 

AND 

( 

(SUM(£.$$FCTCOL_001) <> 0) 

OR ( SUM ( f . $$ FCTCOL__002 ) <> 0) 

OR {SUM { f . $ $ FCTCOL_003 ) <> 0) 

OR { SUM ( £ . $ $ FCTCOL 004) <> 0) 

OR (SUM ( f . $$FCTCOL~005) <> 0) 

OR ( SUM { f . $ $ FCTCOL_006) <> 0) 

OR ( SUM ( f . $$ FCTCOL__007 ) <> 0) 

OR (SUMtf .$$FCTCOL_008) <> 0) 

OR { SUM ( £ . $ $ FCTCOL__009 ) <> 0) 

OR { SUM ( £ . $ $ FCTCOL^O 1 0 ) <> 0) 

OR (SUM { f . 5 $ FCTCOL__0 11) <> 0) 

OR ( SUM ( f . $ $ FCTCOL 012) <> 0) 

OR <SUM(f . $ $ FCTCOL^O 1 3 ) <> 0) 

OR { SUM ( f . $ $ FCTCOL_0 1 4 ) <> 0) 

OR ( SUM { f . $ $ FCTCOL 015) <> 0) 

OR (SUM(f .$$FCTCOL~016) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 17) <> 0) 

OR {SUM ( f . $ $ FCTCOL_0 1 8 ) <> 0) 

OR (SUM ( £ . $ $ FCTCOL_0 1 9 ) <> 0) 

OR ( S UM ( f . $ $ FCTCOL__0 2 0 ) <> 0) 

OR (SUM(f .$$FCTCOL_021) <> 0) 

OR { SUM ( f . $ $ FCTCOL 022) <> 0) 
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JK l SUM ( t . $5FCTCOL_U2 3) <> 0) 

DR { SUM { f . $ $ FCTCOL_02 4 ) <> 0) 

) 

-- #BLOCK_END# MakelL 
-- Index IL for later queries 

^•‘•♦♦♦"fr*****'****************************'*-***-******************.#*****..******.***.*.***** 

— #BLOCK_BEGIN# IndexIL 

>$DDL_BEGIN 
i$DDL~ EXECt 

:REATE INDEX XPK$$ FCTTBL [ ] _IL ON $$FCTTBL[]_IL 
iss, ss_key 


5$DDL_END 

-#BLOCK END# IndexIL 


- Insert BOOKs for changed dim keys 

- When a dimension changes then just create a booking 

- transaction for whatever we negated above with the new 

- dimension and fact values 

- 1ST shoud be indexed 

- Note that we add one to whatever we used as the last 

- seq because this transaction occurs on the same 

- date as the negative one above 

- IR: Insert Rebook 


-#BLOCK_BEGIN# MakeIR 


$ SELECT_INTO_BEGIN [ $ $ FCTTBL [ ] XR) 
ELECT 

s . iss, 
s - ss_key, 
s.date_key, 

1 . transtype_key , 
l.seq + 1 seq 
S.$$DIMKEYR_01 
S.SSDIMKEYR 02 
s.$$0IMKEYR~03 
S.$$DIMKEYR_04 
s . $$DIMKEYR 05 
S .$$DIMKEYR~06 
s . $$DIMKEYR_07 
s.$$DIMKEYR_08 
3 . $$DIMKEYR~09 
S . $ $ DIMKE YR_1 0 
S . $ $ DEGKE Y_0 1 
S . $$DEGKEY_Q2 
s.$$DEGKEY 03 


-1 .$$FCTCOL_001 
-1 . $ $FCTCOL_002 
- 1 . $ $ FCTCOL_0 0 3 
-l.$$FCTCOL_004 
-l.$$FCTCOL_005 
-1 . $ $ FCTCOL_00 6 
-l.$$FCTCOL_007 
-1 . $$FCTCOL_008 
~1 . $ $ FCTCOL 009 


$ S FCTCOL_0 0 1 
$$FCTCOL_002 
$$ FCTCOL JD03 
$$FCTCOL_004 
$$FCTCOL_005 
$ $ FCTCOL_00 6 
$$FCTCOL__007 
$$FCTCOL_008 
$$ FCTCOL 009 
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-1.55 FCTCOL_0 1 0 
-1.55 FCTCOL_0 1 1 
-1 . 5 5 FCTCOL 012 
-l.$5FCTCOL~013 
-l.S$FCTCOL~014 
-1 . 5$FCTCOL~015 
-l.$$FCTCOLJ)16 
-l.$$FCTCOL_017 
-1.55 FCTCOL^O 1 8 
-1.5$ FCTCOL 019 
-1.55FCTCOLJ520 
-1.5$ FCTCOL _021 
-l.$$FCTCOL_022 
-1 . $$FCTCOL_023 
-1.55 FCTCOL 024 


55FCTCOL 010 

$5fctcoiToii 
$$FCTCOL_012 
$$FCTCOL_013 
5$FCTCOL_014 
$ $ FCTCOL__0 1 5 
$$FCTCOL_016 
$ $ FCTCOL_0 1 7 
$ $ FCTCOL__0 1 8 
$$FCTCOL_019 
$5FCTCOL_020 
$ $ FCTCOL_Q 2 1 
$ $ FCTCOL__0 2 2 
$$FCTCOL_023 
$5 FCTCOL 024 



5$ SELECT INTO_BODY[$$FCTTBLl] IR) 

FROM 

$ $ FCTTBL [ ) _IL 1, $$FCTTBL[]_1ST s 
WHERE l.iss “ s.iss AND l.ss_key ■ s.ss_key 

— #BLOCK_END# MakeIR 

— Insert BOOKs for changed dim keys where fact 

— also changed 

— when a dimension changes at the same time as 

-- a fact then we need to make up the fact difference 

— 1ST shoud be indexed 

-- Note that we add two to whatever we used as the last 

— seq because this transaction occurs on the same 

— date as the negative and positive ones above 

— Note also that the Left Outer join uses transtype_key 

— so that only the Bookings at the old value will be counted. 

— Whereas above for the negative transaction value 

— we want to include Shipments in our calculation, here 

— we only want to see how Booking Facts have changed. 

— Here again, only one Booking transaction type is supported 
-- per ss_key 


— IRD: Insert Rebook delta 



— #BLOCK BEGIN# MakeIRD 


>$SELECT_INTO_BEGIN [55 FCTTBL [ )_IRD) 
SELECT 

s.iss, 
s.ss^key, 
s.date_key, 
s< transtype_key, 
l.seq + 2 seq 
S.55DIMKEYRJU 
s. 5$DIMKEYR_02 
s.$$DIMKEYR_03 
s.$$DIMKEYR_04 
s.$$DIMKEYR_05 
s . $$DIMKEYR_06 
s.$5DIMKEYR_07 
S .$5DIMKEYRJ)8 
s. $$DIMKEYR_09 
s. $5DIMKEYR_10 
s. $$DEGKEY_01 
s . SSDEGKEY_02 
S.55DEGKEY 03 
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# WAX ( s . $$ FCTCOL_001 ) - $ $ NVL [ SUM ( f . 5 5 FCTCOL__00 1 ) -,- 0] $$FCTCOL 001 

, MAX(s.$$FCTCOL_002)-$$NVL[SUM(f . $ $ FCTCOL_0 0 2 ) - 0] $$FCTCOL - 002 

, MAX ( s , $$ FCTCOL_003 ) -$ $NVL [ SUM { f . $$FCTCOL_003 ) 0) $$FCTCOL - 003 

/ MAX ( s . $$FCTCOL_004 } -$ $NVL [ SUM ( f . $$FCTCOL_004 ) ~ 0] $$FCTCOlT004 

, MAX ( 3 . $$FCTCOL_005 ) -$ $NVL [ SUM ( f . $$FCTCOL__005 ) 0] $$FCTCOL - O05 

, MAX (3, $$FCTCOL_006) -$$NVL[SUM(f . $ $FCTCOL_006) 0) $$FCTCOL - 006 

, MAX { 3 . $$FCTCOL_007 ) -$ $NVL [ SUM ( f . $ $FCTCOL__007 ) ~ 0] $$FCTCOL~007 

/ MAX { s . $ $ FCTCOL 008 ) -$ $NVL { SUM ( f . $$FCTCOL_008 ) 0} $$FCTCOL - 008 

, MAX(s.$$FCTCOL_009)-$$NVLlSUM(f . $ $FCTCOL_009 ) 0] $$FCTCOL - 009 

, MAX (s. $$ FCTCOL 010 ) -$ $NVL ( SUM ( f . $$FCTCOL__010) 0] $$FCTCOL - 010 

, MAX ( s . $ $FCTCOL — 01 1 ) -$$NVL [ SUM ( f . $$FCTCOL_01 1 ) 0 ) . $$ FCTCOL~01 1 

, MAX (S . $$FCTCOL_012 ) -$$NVL [SUM ( f . $$ FCTCOL 012) 0} $$FCTCOlT012 

, MAX { s . $ $ FCTCOL_0 13) - $ $ NVL [ S UM ( f . $ $ FCTCOL - 0 1 3 ) 01 $$FCTCOL 013 

, MAX { s . $ $ FCTCOL_0 14) - $ $ NVL [ S UM ( f . $ $ FCTCOL^O 1 4 ) 0) $$FCTCOL 014 

, MAX ( s . $$FCTCOL_015 ) -$$NVL [ SUM ( f . $$FCTCOL_015 ) 0] $$FCTCOL~015 

, MAX <s. $$FCTCOL_01 6) -$$NVL [ SUM ( f . $$ FCTCOL 016) - 0) $$FCTCOL 016 

, MAX ( s • $$FCTCOL_017 ) -$$NVL [ SUM ( f . $$ FCTCOL - 017 ) - 0) $$FCTCOL 017 

, MAX(s.$$FCTCOLJ)18)-$$NVL[SUM(f . $$ FCTCOL - O18 ) 0) $$FCTCOL 018 

, MAX { S . $$FCTCOL_019) -$ $NVL [SUM ( f . $$FCTCOL__019) 0] $$FCTCOL 019 

r MAX(s.$$FCTCOLJ)20)-$$NVL[SUM(f . $$FCTCOL_020 ) - 0) $$FCTCOL - 020 

, MAX ( s . $$FCTCOL_02 1 ) - $ SNVL [ SUM ( f . $ $FCTCOL_02 1 ) ~ 0] $$FCTCOl/“021 

, MAX (s. $$ FCTCOL 022 ) ~$$NVL [ SUM ( f . $$ FCTCOL__022 ) 0) $$FCTCOL 022 

, MAX ( S . $$FCTCOL — 023 ) -$ $NVL [ SUM ( f . $$FCTCOL__023) 0) $$FCTCOL 023 

, MAX<s.$$FCTCOL_024)-$$NVL[SUM(f . $$FCTCOL_024 ) 0] $$FCTCOL~024 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL (] I RD] 

FROM 

$ $ FCTTBL ( ] _IL 1, $$FCTTBL(]_1ST s 

$$LOJ_FROM I $$ FCTTBL t ] $$CURR f s.iss ■» f.iss AND s.ss key =» f.ss_key AND 

s . transtype_key - f . transtype_key] 

WHERE 

l.iss = s.iss AND l.s3_key « s.ss_key 

$$ JOIN_WHER£ [s . iss « C.iss ( + ) AND s.ss_key - f.ss key ( + ) AND s . transtype_key «* 
f . transtype_key (+)) 

GROUP BY 

s . i s s , 
s.ss — key, 
s.date_key, 
s . transtype_key, 

1 . seq 

, S. $$DIMKEYR_01 

, S.$$DIMKEYR__02 

, S .$$DIMKEYRJ)3 

, s.$$DIMKEYR_04 

, 3 . $$DIMKEYR 05 

, s.$$DIMKEYR“06 

, s . $$DIMKEYR_07 

, S.$$DIMKEYR_08 

, s. $$DIMKEYR_09 

, S.$$DIMKEYR~10 

, S . $ $ DEGKEY 01 

, s .$$DEGKEY_02 

, s. $$DEGKEY^03 


($$NVL [SUM ( f . $$ FCTCOL__001 ) 0] <> MAX ( 3 . $ $ FCTCOL__00 1 ) ) 

(5$NVL[SCJM(f .$$FCTCOL_002) 0] <> MAX ( s . $ $ FCTCOL 002)) 

( $ $ NVL [ SUM { f . $ $ FCTCOL_0 03) 0] <> MAX ( s . S $ FCTCOL'"'003 ) ) 

<$$NVL[SOM(f .$$ECTCOL_004) 0] <> MAX < s . $ $ FCTCOL~004 ) ) 

( § $NVL I SUM ( f , $$FCTCOL__005 ) 0) <> MAX ( s . $ $FCTCOL~005) ) 

( $ SNVL [ SUM ( f . $$FCTCOL_006) 0) <> MAX ( S . $ $FCTCOL””006) ) 

( $ $NVL [ SUM ( f . $$ FCTCOL 007) 0] <> MAX ( s . $ $ FCTCOL 007)) 

{ $$NVL [SUM ( f . $$FCTCOL~”008 ) 0) <> MAX ( 3 . $ $ FCTCOL"”008 ) ) 

( $$NVL [ SUM ( f . $$FCTCOL~009 ) 0] <> MAX ( s . $$ FCTCOL~009) ) 

( $$NVL f SUM ( f . $$FCTCOL__010 ) 0] <> MAX { s .$$ FCTCOL 010)) 

($ $NVL[ SUM (f.$$ FCTCOL 011) 0] <> MAX ( 3 . $$ FCTCOL - 01 1 ) ) 

( $ $ NVL [ SUM ( f . $ $ FCTCOL~0 1 2 ) 0) <> MAX ( s . $$FCTCOL~* 012 ) ) 

($$NVL [SUM ( f . $$FCTCOL_013 ) - 0) <> MAX ( s . $ $ FCTCOL - 013 ) ) 

( $ $ NVL [ SUM { f , $ $ FCTCOL_0 1 4 ) 0) <> MAX ( s . $ $ FCTCOL - 014 ) ) 

( $ $ NVL I SUM ( f . $ S FCTCOL_0 15) -,~01 <> MAX ( s . $ $FCTCOL - 015) ) 

( $ $ NVL { SUM ( f . S $ FCTCOL 016) 01 <> MAX { s . $ $ FCTCOL - 01 6) ) 
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( $ $ NVL [ SUM { £ . $ $ FCTCOL 
( $$NVL [ SUM ( f . $$FCTCOlf 
($$ NVL [ SUM ( f .$$ FCTCOL" 
( $$NVL [ SUM ( f . $ $ FCTCOL - 
( $ $NVL [ SUM < f . $ $ FCTCOL - 
($$NVL [SUM ( f . $$FCTCOL - 
( $ $ NVL [ S UM ( f . $ $ FCTCOL - 
( $ $ NVL ( SUM { f . $ $ FCTCOL 


OJ <> MAX ( s~, 
0) <> MAX ( 3 . 
0} <> MAX ( s . 
0) <> MAXis. 
0] <> MAX ( s . 
0] <> MAX { s . 
01 <> MAX { s . 
01 <> MAX ( S , 


$$ FCTCOL 
$ $ FCTCOL - 
$$ FCTCOL - 
$$ FCTCOL - 
$$ FCTCOL - 
5 S FCTCOL 
$$FCTCOL - 
$ $ FCTCOL - 


BLOCK END# MakeIRD 


— Insert BOOKS for deltas with same dim keys OR for 
-- brand new orders. 

— Note that we DON'T want to count Shipments 

— (so shipment ss_key's should be different from 

— order ss_keys) since we just want bookings to sum up 

— to whatever this transcation says they should be. 

— Fact table should be indexed 

— WHERE clause prevents double booking on changed 

— dimension - if we didn't use the NOT EXISTS clause 

— then this query would repeat the work of the last one 
-- above - which we have already taken care of 

— HAVING clause ensures that multiple 0 records don't 

— get inserted whenever this procedure is run 

— Note that we increment the sequence number just in case 

— this new transaction occurs on the same date as the la 3 t 
-- existing one in the fact table - to avoid index errors 

-- IND: Insert New Delta 


--#BLOCK_BEGIN# MakeIND 

$$SELECT_INTO_BEGIN[$$FCTTBL[l_INDl 

SELECT 

s .iss, 
s . ss_key, 
s.date_key, 
s . transtype_key, 

$$NVL (MAX ( f . seq) 0] + 1 seq 

, s.$$DIMKEYR_01 

, s.$$DIMKEYR_02 

, s. $$DIMKEYR_03 

, s . $$DIMKEYR_04 

, s.$$DIMKEYR_05 

, s. $$DIMKEYR_06 

, s. $$DIMKEYR_07 

, S . $ $DIMKEYR_08 

, s * $$DIMKEYR_09 

, s. $$DIMKEYR_10 

, S.$$DEGKEYJ)1 

, s . $ $ DEGKEY_0 2 

, s . $$DEGKEY 03 


. $$ FCTCOL 
. $$ FCTCOL 
. $$ FCTCOL 
. $ $ FCTCOL 
. $ $ FCTCOL 
. $$ FCTCOL 
. $$ FCTCOL 
. $ $ FCTCOL* 
.$$FCTCOL 
. $$ FCTCOL 
.$$FCTCOL‘ 


'* [ SUM ( f 
j [ SUM ( f 
j ( SUM ( f 
j ( SUM ( f 
4 ( SUM ( f 
,(SUM(f 
j [ SUM ( f 
j ( SUM ( f 
4SUM(f 
/(SUM ( f 
; ( SUM ( f 


$ $ FCTCOL 
$ $ FCTCOL 
$ $ FCTCOL 
$$ FCTCOL 
$3 FCTCOL 
$$ FCTCOL 
$$ FCTCOL 
$$ FCTCOL 
5$ FCTCOL 
$3 FCTCOL 
$$ FCTCOL 


0) $3 FCTCOL 
0) 3 3 FCTCOL - 
0] $$FCTCOL_ 
0) 3$ FCTCOL 
0) $ 3 FCTCOL - 
0] $ $ FCTCOL - 
0) $ $ FCTCOL - 
0] 3 3 FCTCOL 
0) 3 3FCTCOL - 
0] 5 3FCTCOL__ 
0] $$ FCTCOL - 
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, MAX (s. $$FCTCOL_012)-$$NVL (SUM( f . SSFCTCOL 012) 

, MAX ( s . S $ FCTCOL 013)-$SNVL[SUM(f .$$FCTCOL - O13) 

< MAX ( s . $ S FCTCOlTo 1 4 ) - S SNVL [ SUM ( f . $ S FCTCOlTO 1 4 ) 

> MAX ( 3 . $ S FCTCOLTO 1 5 ) -$$NVL (SUM( f , $ $ FCTCOL~0 1 5 ) 

, MAX (s . $$FCTCOL~Q16) -$$NVL[SUM( f. SSFCTCOL 016) 

, MAX (s.$S FCTCOL 017) -SSNVL [SUM( f. SSFCTCOL 017) 

, MAX (S . S$FCTCOL~018 ) -SSNVL [SUM ( f . $ $ FCTCOL_0 1 8 ) 

, MAX (s . S$FCTCOL_019) -SSNVL [SUM(f. SSFCTCOL 019) 

, MAX ( s . $ $ FCTCOL_020) -SSNVL [ SUM ( f . $ $ FCTCOLJ320 ) 

< MAX ( s . $ $FCTCOL_02 1 ) -SSNVL [SUM ( f . S S FCTCOL_021 ) 

1 MAX ( S . $$FCTCOL_022) -SSNVL (SUM( f. $$FCTCOL_022) 

, MAX (s . $$FCTCOL_023) -SSNVL [SUM(f. S$ FCTCOL 023) 

, MAX <s.$$FCTCOL_024) -SSNVL [SUM (f . SSFCTCOLJ524) 

S $SELECT_INTO_BODY ( S $ FCTTBL [ ] IND] 

FROM 

$$FCTTBL( ] 1ST s $SLOJ_FROM[SS FCTTBL [] SSCURR f 

s.iss = f.iss AND s.ss_key = f.ss key AND f. transtype key = s. transtype key] 
WHERE ~ ~ “ 

NOT EXISTS (SELECT * FROM $$FCTTBL[ J XL WHERE iss = s.iss AND ss key « s.ss_key) 

S$JOIN_WHERE(s.iss = f.iss (+) AND s.ss_key «= f.ss key (+) AND s. transtype key « 
f. transtype key (+)] ~ 

GROUP BY 

s.iss, 

s.ss_key, 

s.date_key, 

s.transtype key 
, s.SSDIMKEYR - 01 

, s . $SDIMKEYR~02 

, S.$$D1MKEYR 03 

, S.SSDIMKEYRJ54 

, s . S S DIMKEYR 05 

, s.SSDIMKEYR~06 

, S.$$DIMKEYR~07 

, s.SS DIMKEYR 08 

, S . $$DIMKEYR _ 09 

, S.$$DIMKEYR“10 

, s.$$DEGKEY_01 

, s.$$DEGKEY 02 

, S . $ $ DEGKE Y~0 3 

HAVING 

($$NVL[SUM ( f . $ S FCTCOL_00 1 ) 0] <> MAX ( s . S $ FCTCOL 001)) 

OR ($$NVL[SUM(f.$$FCTCOL~002) 0] <> MAX (s .$$FCTCOL 002)) 

OR ( $$NVL [SUM ( f . $$FCTCOL_003) - 0) <> MAX (s.SSFCTCOL - 003) ) 

OR ($$NVL [ SUM ( f .$$ FCTCOL 004) 0] <> MAX (s .$?FCTCOL~004) ) 

OR ($$NVL[SUM(f .S$FCTCOL~ 005) 0) <> MAX ( s .$$ FCTCOL 005)) 

OR ($$NVL[SUM(f.$S FCTCOL~0 0 6 ) 0] <> MAX (s . SSFCTCOL 006)) 

OR ($$NVL[SUM(f ,$$FCTCOL — 007) 0] <> MAX (s . $?FCTCOL~007) ) 

OR ($$NVL [ SUM ( f .$$ FCTCOL~008) 0] <> MAX (s.$$ FCTCOL 008)) 

OR ( $ $NVL [ SUM ( f . S S FCTCOL_0O 9 ) 0) <> MAX (s . $SFCTCOL~009) ) 

OR ($$NVL[SUM(f .$$FCTCOL 010) 0] <> MAX ( s . $ $ FCTCOL~0 1 0 ) ) 

OR ($$NVL(SUM(f.$$FCTCOL~011) 0] <> MAX ( S .$? FCTCOL 011)1 

OR ( S $NVL [ SUM ( f . $ $ FCTCOL~012 ) 0] <> MAX <S.$$ FCTCOL 012)) 

OR ( $ $NVL [ SUM ( f . $$ FCTCOL 013) 0] <> MAX (s . S$FCTCOL~013) ) 

OR (SSNVL[SUM(f.$$FCTCOL"014) 0] <> MAX ( s . $ $ FCTCOL - 0 14)) 

OR (S$NVL[SUM(f.$$FCTCOL 015) 0] <> MAX (s.$$FCTCOL_015) ) 

OR ($$NVL[SUM(f »$$FCTCOL~016) 0] <> MAX (s.$S FCTCOL 016) ) 

OR <$$NVL[SUM(f.$$FCTCOL_017) 0] <> MAX(s.$$FCTCOL~017) ) 

OR ($ $NVL [ SUM <f.$$ FCTCOL 018) 0] <> MAX ( s . S $ FCTCOL 018)) 

OR ($$NVL(SUM(f.$$FCTCOL _ 019) 0] <> MAX<s.$SFCTCOL~019) ) 

OR (S$NVL[SUM(f ,$$FCTCOL~020) 0] <> MAX (S . $$ FCTCOL 020)) 

OR ( $ $NVL ( SUM ( f , 5$ FCTCOL_021 ) 0] <> MAX<s.S$FCTCOL~021) ) 

OR ($$NVL [SUM ( f .$$ FCTCOL 022) 0] <> MAX(s.$$FCTCOL~022) ) 

OR ( $ SNVL [ SUM ( f . 5 $ FCTCOL~Q23 ) -,-0] <> MAX(s.$$FCTCOL~023) ) 

OR ($?NVL[SUM(f.$$ FCTCOL_02 4 ) 0] <> MAX(s.$$FCTCOL_024) ) 


— »BLOCK_END# MakeIND 


0] SSFCTCOL 012 
0] $$FCTCOL~013 
0] $$FCTCOL~014 
0] SSFCTCOL 015 
0] $SFCTCOL - O16 
0) $SFCTCOL - O17 
0] $$FCTCOL~018 
0] SSFCTCOL 019 
0] SSFCTCOL~020 
0] $$FCTCOL_021 
0] $$FCTCOL_022 
0) SSFCTCOL_023 
0] SSFCTCOL 024 
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-- Insert BOOKs for deltas with same dim keys 

— If the dimensions don't change then we create a 

— new booking order (as long as at least one of the facts 

— have changed) 

— IDM: Insert Delta More 




*********** 






— # BLOCK_BEGIN # Make I DM 

$$SELECT_INTO BEGIN ($$ FCTTBL () IDM) 
SELECT 

tiss iss, 
tss_key 3s_key, 
tdate_key date_Jcey, 
ttranstype_key~transtype_key, 
0 seq 

t$$DIMKEYR_01 $$DIMKEYR_01 
t$$DIMKEYR_02 $$DIMKEYR_02 
t$$DIMKEYR_03 $$DIMKEYR_03 
t$$DIMKEYRJ)4 $$DIMKEYR_04 
t$$DIMKEYR_0S $$DIMKEYR_05 
t$ $ DIMKEYR_0 6 $$DIMKEYR_06 
t$$DIMKEYR_07 $$DIMKEYR_07 
t$$DIMKEYR_08 $$DIMKEYR_08 
t$$DIMKEYR 09 $$DIMKEYR_09 
t$$DIMKEYR~lQ $$DIMKEYR_10 
t$$DEGKEYJ)l $$DEGKEY_01 
t$$DEGKEY_02 $$DEGKEY_02 
t$$DEGKEY 03 $$DEGKEY 03 


1 5 $ FCTCOL 

t $ $ fctcol" 

t$$ FCTCOL' 

t$$ fctcol' 
t $ $ fctcol' 

t$$FCTCOL' 

t$$ fctcol' 
t$$ fctcol" 

t$$ FCTCOL' 
t$ $ FCTCOL' 

t $$ fctcol' 

t$$FCTCOL~ 

ts$ fctcol' 
t$$ fctcol' 

t$$FCTCOL' 
t$ $ FCTCOL" 

t$$ fctcol' 

t$$FCTCOL' 

t$$ fctcol' 
t$$ fctcol' 
t$$FCTCOL' 
t$$FCTC0L_ 
t$$ FCTCOL 
t5$ FCTCOL' 


0 0 1 - s $ $ FCTCOL_0 0 1 

002- s$$FCTCOL_002 

003- S$$FCTCOL_003 

004- s$$FCTCOL_004 

005- S$$FCTCOL_005 

006- S$$FCTCOL_006 

007- s$$FCTCOL_007 

008- *s$$FCTCOL__008 

009- s$ $FCTCOL__009 
0 1 0 - s $ $ FCTCOL_0 1 0 

0 1 1 - s $ $ FCTCOL_0 1 1 

0 1 2 - s $ $ FCTCOL_0 1 2 
013“S$$FCTCOL 013 
0 1 4 - s $ $ FCTCOL~01 4 

015- s$$FCTCOL_015 

016- s$$FCTCOLJ)16 

0 1 7 - s $ $ FCTCOL__0 1 7 
0 1 8 “• 5 $ $ FCTCOL_0 1 8 

0 1 9 - s 5 $ FCTCOL_0 1 9 

020- s$$FCTCOL_020 

02 1 - s $ $ FCTCOL_02 1 

022- s$$FCTCOL 022 

023- S$$FCTCOL~023 
02 4 - s $ $ FCTCOL 024 


$$FCTCOL_001 
$$FCTCOLJ>02 
$$FCTCOL_003 
$ $ FCTCOL_0 0 4 
$$FCTCOL_005 
$ $ FCTCOL__0 0 6 
$ $ FCTCOL_007 
$ $ FCTCOL_0 0 8 
$$ FCTCOL _00 9 . 
$ $ FCTCOL_0 1 0 
$ $ FCTCOL_0 1 1 
$$FCTCOL_012 
$ $ FCTCOL_0 1 3 
S $ FCTCOL__0 1 4 
$$FCTCOL_015 
$ $ FCTCOL_01 6 
$ $ FCTCOL__0 1 7 
$ $ FCTCOL_0 1 8 
$ $ FCTCOL_0 1 9 
$$FCTCOL_020 
$$FCTCOL_021 
$ S FCTCOL__0 2 2 
$ $ FCTCOL_0 2 3 
$$ FCTCOL 024 


$ $ S ELECT_I NTO_BOD Y ( $ $ FCTTBL [ ) _I DM ) 


FROM 

WHERE 


$ $ FCTTBL ( ) _NFD d 

( 

(S$$DIMKEYR_06 
( s $ $ DIMKE YR_0 5 
(S$$DIMKEYR_07 
(s$$DIMKEYR_04 
(S$$DIMKEYR_08 
( s$$DIMKEYR 03 


t$$DIMKEYR__06 ) 
t$$DIMKEYR_05) 
t$$DIMKEYR_07) 
t$$DIMKEYR_04) 
t$$DIMKEYR_08) 
t$$DIMKEYR 03) 


AND 

AND 

AND 

AND 

AND 

AND 
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(S$$DIMKEYR_09 *= t$ $DIMKEYR_09 ) AND 
(S$$DIMKEYR_02 « t$$DIMKEYR_02 ) AND 
<S$$DIMKEYR_10 « t$$DIMKEYR 10) AND 
<s$$DIMKEYR_01 « t $$DIMKEYR_01 ) 

) 

AND 

( 

(s$$FCTCOL_001 <> t$$FCTCOL_001) 

OR (S$$FCTCOL_002 <> t$$FCTCOL_002 ) 

OR (s$$FCTCOL_003 <> t$ $FCTCOL_003) 

OR {s$$FCTCOL~004 <> t$$FCTCOL_004) 

OR (S$$FCTCOL_005 <> t$ $ FCTCOL_005 ) 

OR (S$$FCTCOL_006 <> t$$ FCTCOL_006 ) 

OR (s$$FCTCOL_007 <> t$$ FCTCOL_007 ) ' 

OR (s$$FCTCOL_008 <> t$ $ FCTCOL_008 ) 

OR (S$$FCTCOL_OG9 <> t$$FCTCOL_009 ) 

OR ( s $ $ FCTCOL_0 1 0 <> t$$FCTCOL_010 ) 

OR { s $ $ FCTCOL_0 1 1 <> t$$FCTCOL_011) 

OR { 3 $ $ FCTCOL_0 1 2 <> t$ $FCTCOL_012 ) 

OR < s $ $ FCTCOL_0 1 3 <> t$ $FCTC0L_Q1 3) 

OR ( S $ $ FCTCOL_0 X 4 <> t$ $FCTCOL_014 ) 

OR (s$$FCTCOL_015 <> t$$FCTCOL_015) 

OR (s$$FCTCOL_016 <> t$ $FCTCOL_016) 

OR ( S $ $ FCTCOL_0 1 7 <> t$ $FCTCOL_017 ) 

OR (s$$FCTCOL_018 <> t$$FCTCOL_018 ) 

OR ( 3 $ $ FCTC0L_0 1 9 <> t $ $ FCTCOL_0 1 9 ) 

OR (s$$FCTCOL_020 <> t$$FCTCOL_020 ) 

OR (S$$FCTCOL_021 <> t$ $ FCTCOL_021 ) 

OR (S$$FCTCOL_022 <> t$$FCTCOL_022) 

OR <s$$FCTCOL_023 <> t$$FCTCOL_023) 

OR (s$$FCTCOL_024 <> t$$FCTCOL 024) 

) 


— #BLOCK_END# Make I DM 



Insert negative BOOKS for deltas with different dim keys 


— If one of the dimensions change then we first create a lose transaction for 
all the previous facts. (Negate all the facts from the earlier of the two 

— transactions) 

— ILM; Insert Lost More 

'***" * ********** * * * — **.*******************•—/ 

--#BLOCK_BEGIN# MakeILM 

$$ SELECT INTO_BEGIN($$FCTTBL[] ILM) 

SELECT ~ ■ “ 

siss iss, 
sss_key ss_key, 
tdate_key date__key, 
stranstype_key transtype_key, 

0 seq 

, s$$DIMKEYR_01 $$DIMKEYR_01 

, S$$DIMKEYR_02 $$DIMKEYR 02 

, s$$DIMKEYR_03 $$DIMKEYR~03 

«■ s$$DIMK£YR_04 $$DIMKEYR_04 

, S$$DIMKEYR_05 $$DIMKEYR_05 

, S$$DIMKEYR_06 $$DIMKEYR_06 

, S$$DIMKEYR_07 $$DIMKEYR_07 

/ s$$DIMKEYR_08 $$DIMKEYR_08 

, s$$DIMKEYR_09 $$DIMKEYRJ)9 

, s$$DIMKEYR^10 $$DIMKEYR_10 

, s$ $DEGKEY 01 $$DEGKEY_01 . 

, . s$$DEGKEY~02 $$DEGKEY_02 • 

, s$$DEGKEY_03 $$DEGKEY_03 

j -s$$FCTCOL 001 $$ FCTCOL 001 
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t 

~S$$ FCTCOL 002 

$$ FCTCOL 002 


t 

-s$$FCTCOL 003 

$$ FCTCOL 003 


| 9 

- 3$ $ FCTCOL 004 

$$ FCTCOL 004 


r 

-s$$ FCTCOL 005 

$$ FCTCOL 005 


f 

-S$$ FCTCOL 006 

$$ FCTCOL 006 


t 

-3$ $ FCTCOL 007 

$$ FCTCOL 007 


9 

“S$ $ FCTCOL 008 

$$ FCTCOL 008 


9 

-s$$ FCTCOL 009 

$$ FCTCOL 009 


t 

-s$$ FCTCOL 010 

$$FCTCOL~010 


t 

-S$$ FCTCOL Oil 

$5 FCTCOL Oil 


t 

-s $5 FCTCOL 012 

$$ FCTCOL 012 


* 

-S$$ FCTCOL 013 

$$ FCTCOL 013 


t 

-S$$ FCTCOL 014 

$$ FCTCOL 014 


f 9 

-S$$ FCTCOL 015 

$$ FCTCOL 015 


t 

-S$$ FCTCOL 016 

$$ FCTCOL 016 


t 

-S$ $ FCTCOL 017 

$$ FCTCOL 017 


* 

-sSS FCTCOL 018 

$$ FCTCOL 018 


9 

-S$$ FCTCOL 019 

$$ FCTCOL 019 


9 

-s$$ FCTCOL 020 

$$ FCTCOL 020 


* 

-5$ $ FCTCOL 021 

$$ FCTCOL 021 


t 

-s$$ FCTCOL 022 

$$ FCTCOL 022 


* 

-s$$ FCTCOL 023 

$$ FCTCOL 023 


t 

-s$ $ FCTCOL 024 

$$ FCTCOL 024 


$$ SELECT INTO BODY [ $ $ FCTTBL ( 1 ILM) 


FROM 





$$ FCTTBL [J NFD 

d 


WHERE 





\ 

(S5SDIMKEYR 06 

<> t$$DIMKEYR 06) 

OR 


(s$$DIMKEYR 05 

<> t$$DIMKEYR 05) 

OR 


(S$$DIMKEYR 07 

<> t$?DIMKEYR 07) 

OR 


(S$$DIMKEYR 04 

<> t$$DIMKEYR 04) 

OR 


(S$$DIMKEYR 08 

<> t5$DIMKEYR 08) 

OR 


(S$$DIMKEYR 03 

<> t $$DIMKEYR 03) 

OR 


(S$$DIMKEYR 09 

<> t$$DIMKEYR 09) 

OR 


(S$5DIMKEYR 02 

<> t$$DIMKEYR 02) 

OR 


<S$$DIMKEYR 10 

<> t$$DIMKEYR~10) 

OR 


(S$$DIMKEYR 01 

<> t$$DIMKEYR_01) 


AND 





( 

{ s$$ FCTCOL 001 

<> 0) 


OR 

(s$$FCTCOL 002 

<> 0) 


OR 

(s$$FCTCOL 003 

<> 0) 


OR 

(s$$FCTCOL 004 

<> 0) 


OR 

< s$$ FCTCOL 005 

<> 0) 


OR 

(3$$FCTC0L 006 

<> O) 


OR 

(s$$ FCTCOL 007 

<> 0) 


OR 

(s$$ FCTCOL 008 

<> O) 


OR 

(s$$ FCTCOL 009 

<> 0) 


OR 

{ s$ 5FCTCOL 010 

<> 0) 


OR 

( s$ 5 FCTCOL 011 

<> 0) 


OR 

( s $ $ FCTCOL 012 

<> 0) 


OR 

( sS $ FCTCOL 013 

<> 0) 


OR 

( 3$ $ FCTCOL 014 

<> 0) 


OR 

(S$$FCTCOL~015 

<> 0) 


OR 

( s 5 $ FCTCOL 016 

<> 0) 


OR 

( s$$FCTCOL 017 

<> O) 


OR 

( s$$FCTCOL 018 

<> O) 


OR 

( s $ $ FCTCOL 019 

<> 0) 


OR 

(s$$ FCTCOL 020 

<> 0) 


OR 

(s$$FCTCOL 021 

<> 0) 


OR 

( s $ $ FCTCOL 022 

<> 0) 


OR 

( S$ $ FCTCOL 023 

<> 0) 


OR 

(s$$FCTCOL 024 
) 

<> 0) 


- — #BLOCK_END# Make ILM 



| /****** 

***************1 
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— Insert BOOKS for deltas with different dim keys 

— When a dimension key changes then we can simply insert all the new facts with the 
-- new dimension keys 


— Note that seq 

— this order. 


1 here because this is the second transaction on this date for 


— IRM: insert Rebook More 






— #BLOCK_BEGIN# MakeIRM 

$ $ SELECT_INTO_BEGIN [ $ $ FCTTBL {] _IRM] 
SELECT 

tiss iss, 
tss_key ss_key, 
tdate^key date_key, 
ttranstype_key transtype_key, 
1 seq 

t$$DIMKEYR_01 $$DIMKEYR_01 
t$$DIMKEYRJ)2 $$DIMKEYR_02 
t$$DIMKEYR_03 $$DIMKEYR 03 
t$$DIMKEYR_04 $$DIMKEYR~04 
t$$DIMKEYR_05 $$DIMKEYR~05 
t$$DIMKEYR__06 SSDIMKEYR 06 
t$$DIMKEYR_07 $$DIMKEYR~07 
t$$DIMKEYR_08 $$DIMKEYR 08 
t$$DIMKEYR_09 $$DIMKEYR~09 
t$$DIMKEYR_10 $$DIMKEYR_I0 
t$$DEGKEY_01 $$DEGKEY_01 
t$$DEGKEY_02 $$DEGKEY_02 
t $ $ DEGKEY 03 $$DEGKEY 03 


t$$ FCTCOL J)01 
t$$FCTCOL_002 
t$$FCTCOL 003 
t$$FCTCOL~004 
t$$FCTCOL_005 
t$ $ FCTCOL J) 06 
t $ $ FCTCOL__007 
t$$.FCTCOL_008 
t$$FCTCOL_009 
t $ $ FCTCOL__0 1 0 
t$$FCTCOL_011 
t $ S FCTCOL_0 1 2 
t$$ FCTCOL JD 13 
t$$FCTCOL_014 
t$$ FCTCOL J315 
t$$FCTCOL_016 
t $ 9 FCTCOL~0 1 7 
t $ $ FCTCOL_0 1 8 
t$$ FCTCOL__019 
t$$FCTCOL_020 
t$ $ FCTCOL_02 1 
t$$FCTCOL_022 
t$$FCTCOL__023 
t$$ FCTCOL 024 


$ $ FCTCOL_0 0 1 
$ $ FCTCOL_0 02 
$$FCTCOL_003 
$ $ FCTCOL_0 04 
$ $ FCTCOL_0 0 5 
$ $ FCTCOL_0 0 6 
$$FCTCOL_007 
S $ FCTCOL_0 0 8 
$ $ FCTCOL^O 0 9 
$ $ FCTCOL~0 1 0 
$ $ FCTCOI*_0 1 1 
$$FCTCOL_012 
$$FCTCOL_013 
$ $ FCTCOL_0 1 4 
$$FCTCOL_015 
$$FCTCOL_016 
$$FCTCOL_017 
$ $ FCTCOL 018 
$$FCTCOL~019 
$ $ FCTCOL_0 2 0 
$ $ FCTCOL__02 1 
$$FCTCOL_022 
$$FCTCOL_023 
$$ FCTCOL 024 


$$SELECT_INTO_BODY [$$FCTTBL{ ] IRMJ 
FROM 

$$ FCTTBL []_NFD d 

WHERE 

( 

( S $ S DIMKEYR__0 6 <> t$$DIMKEYR 06) OR 
(S$$DIMKEYR 05 <> t$$DIMKEYRJ>5) OR 
( S$$DIMKEYR__07 <> t$$DIMKEYR_07) OR 
(s$$DIMKEYR - 04 <> t$ $ DIMKEYR_0 4 ) OR 
(s$$DIMKEYR 08 <> t$$DIMKEYR 08) OR 
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AND 


OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 

OR 


( s $ $ D IMKEY R_0 3 <> 
(S$$DIMKEYR 09 <> 
<S$$DIMKEYR”02 <> 
<S$$DIMKEYR~10 <> 
(S$$DIMKEYR_01 <> 
) 

( 

(t$$ FCTCOL 
(t$$ FCTCOL 
( t$ $ FCTCOL 
( t$ $ FCTCOL* 

(t$$ FCTCOL' 

<t$$ fctcol' 

(t$$ FCTCOL' 

( t$ $ fctcol' 

(t$$FCTCOL" 

( t$ $fctcol" 

(t$$FCTCOL~ 
(t$$FCTCOL~ 

{ t$$FCTCOL~ 
{t$$FCTCOl»” 

( t$ $ FCTCOL - 

{ t $ $ fctcol" 

( t$ $FCTCOL - 
<t$$FCTCOL - 
( t$$ FCTCOL" 

( t$$FCTCOL~ 

( t$ $ FCTCOL - 
( t$$FCTCOL 
(t$$ FCTCOL” 

( t$ $fctcol” 

> 


t $ $ DIMKEYR_0 3 ) OR 
t$ $DIMKEYR_09 ) OR 
t$$DIMKEYRJ)2) OR 
t$$DIMKEYR_10) OR 
t$$DIMKEYR 01) 


001 

*002 

'003 

'004 

'005 

'006 

"007 

008 

009 

010 

011 

012 

013 

014 

015 

016 

017 

018 

019 

020 
021 
022 

023 

024 


0) 

0) 

0) 

0) 


<> 

<> 

<> 

<> 

<> 0 ) 
<> 

<> 

<> 

<> 

<> 

<> 

<> 

<> 

<> 

<> 


0) 
0) 
0) 
0) 
0) 
0 ) 
0 ) 
0) 
0 ) 
0) 
<> 0) 
<> 0 ) 
<> 0 ) 
0 ) 
0 ) 
0 } 
0 ) 
0 ) 
<> 0 ) 


— #BLOCK END# MakelRM 


/* 


-- Delete the output tables 

— #BLOCK_BEGIN# DropOutput 
$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EX I STS ( $ $ FCTTBL [) 5 $ NEXT ) 
$$DROP_TABLE IF EXISTS [ $$ FCTTBL [J INC) 

$ $DDL_END 

— #BLOCK_END# DropOutput 

/******♦************«•****♦******★**★★****** + ■**< 
~~Create FC table in case force^close was 
— not run 




**♦***********+ 


**- + ***»*** + «« 








--#BLOCK__BEGIN# MakeFC 

DECLARE S$VAR If coexists) $$EPIINT$$EOS 

$$DDL_BEGIN_NO_DECLARE 

$$VAR_ASSIGN_BEGIN(fc_exists] 

SELECT COUNT (1) 

$$VAR_ASSIGN_INTO[fc_exi3ts] 

FROM $$ SQLSERVER [ sysob j ects ] $$ ORACLE [ tabs ) 

WHERE 

$$SQLSERVER{ id =• ob j ec t_id ( ' dbo . $ $ FCTTBL [ J _FC * ) AND sysstat & Oxf *= 3) 
$$ORACLE[ table name - UPPER ('$$ FCTTBL []__FC T ) ) 

$ $ VAR_AS S I GN END 


$$IF[$$VAR( f coexists ) 
$$DDL EXEC [ 


0J 
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$ $ SELECT INTO_BEGIN ($$ FCTTBL { ) _FC] 

SELECT 

$$ S ELECT_I NTO^BODY ($ S FCTTBL ( 1 _FC ] 

FROM 

$$ FCTTBL [) $$CURR 

WHERE 

1-0 

] 

$$END_IF 

$$DDL_END 

— # BLOCK_END# MakeFC 

/*.******************.***** ***.****.******.********************** ***********♦*******/ 

— Create the incremental table 

/**#-***#************* + ******«***•**«*<****** + *** + ************** + .* + + ***#*«-** + + + «******/ 

--#BLOCK_BEGIN# MakeINC 

$$ SELECT INTO_BEGIN[$$FCTTBL[) INC] 

SELECT 

* 

$ $ SELECT_INTO_BODY [ $ § FCTTBL [ J _INC I 
FROM $$ FCTTBL [J_TIN UNION ALL 
SELECT * FROM $$ FCTTBL []_IL UNION ALL 
SELECT * FROM $$ FCTTBL [ )_IR UNION ALL 
SELECT * FROM $$ FCTTBL [] _IRD UNION ALL 
SELECT * FROM $$FCTTBL [] _IND ONION ALL 
SELECT * FROM $$ FCTTBL [] IRM UNION ALL 
SELECT * FROM $$ FCTTBL [ I ~ILM UNION ALL 
SELECT * FROM $$ FCTTBL [ J_FC UNION ALL 
SELECT * FROM $$ FCTTBL [ )_I DM 

— # BLOCK_£ND# MakeINC 

/I*********#*******************#*#************************#**************************/ 

-- CR158 : We want to load _IMI table and still keep the non-descending 
-- order so that the clustered index on a fact table can be created 

— without sorting. This way can speed up significantly in creating a 
-- clustered index on a very large already sorted fact table. 

/,.************t*o***********.****.* *******.**.*M********.. V t**.*i*..*.**v 

— #BLOCK_ BEGIN# MakelMI 

$ $ SELECT_INTO_BEG IN [ $ $ FCTTBL I) I MI ] 

SELECT 

* 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL [J _IMI ] 

FROM $$ FCTTBL [ J $$CURR 

WHERE datekey >= (SELECT MIN <date_key) FROM $$ FCTTBL (] _INC) 

UNION ALL 

SELECT * FROM $ $ FCTTBL [ ] _INC 
$$ SQLSERVER [ORDER BY 
date_key 

, $$DIMKEYRJ31 

, $$DIMKEYR_02 

, $$DIMKEYR_03 

, ' $$DIMKEYR_04 

, $$DIMKEYR__05 

, $$DIMKEYR_06 

, 5 $ DIMKEYR__07 

, $$DIMKEYR_08 

, $$DIMKEYR_09 

, . $$DIMKEYR_10 

] 

— #BLOCK_END# MakelMI 

/** + **•****** + ***** + + **#** + •*##*********** + + + + + +* + + « **★ + + + **♦****#•** + ** + *** + »******* + / 

— Create the new fact table and incremental table 


26 
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— Note that transaction tables must be built before 

— these statements are run 

/************ **********.**************************************♦*♦+****♦********, 

--#BLOCK_BEGIN# MakeNewFact 

$ $ SELECT INTO_BEGI N [ $ 5 FCTTBL [ ) $ $NEXT 1 
SELECT 

$ $ SELECT INTO_BODY ( $ $ FCTTBL (J $ $ NEXT ] 

FROM $$ FCTTBL {] $$CURR s 

WHERE s.date__key < (SELECT MIN (date key) FROM $$ FCTTBL (J INC) 

UNION ALL 

SELECT * FROM $$ FCTTBL [) _I MI 
— #BLOCK_END# MakeNewFact 

/*****-** + *****#*************** + ****** 4 ****** + **+****#********** + **-***** + + «***+*** 4 * + / 

— Count processed, inserted rows 

/fr**************#****************#********************-******************************^ 

— #BLOCK_BEGIN# SPResultS 

DECLARE $$VAR[COunt_INC] $$EPIINT$$EOS 

BEGIN 

$$VAR_ASSIGN_BEGIN [count_INC] 

SELECT COUNT (1) 

$$VAR_ASSIGN_INTO[count_INC] 

FROM $$ FCTTBL [J_INC 
$ S V AR_A SSI GN_EN D 

INSERT INTO adaptive_template_prof ile (tokenjname, number_rows) 

SELECT 'PROCESSED', COUNT (1) FROM $$ FCTTBL (1 _MFL$ $ EOS 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'INSERTED', $ $VAR (count_INC) -COUNT(l) FROM $$ FCTTBL ()JTIN$$ EOS 

END$$EOS 

--#BLOCK_END# SPResults 

/»*******+********+*****************•********#****##***•**#******++/ 

— Set join order for SQL Server 

/************■****■****•************★*****»************************•**★/ 

--SBLOCK_BEGIN# ForcePlanOff 
$$ SQLSERVER (SET FORCEPLAN OFF) 

— # BLOCK_END# ForcePlanOff 

/******♦**■**«**#• * * ********************************* + *«*************#****#*«-*****-»**/ 
--Drop temp tables and TXN and TIN table 

/«***»***'**-*****# + ******** + ***» + *** + *********** **<** + *****••**• + «****************** + */ 

— #BLOCK_BEGIN# DropTempsAf ter 

$$DDL_BEGIN 

$$DROP_TABLE_IF_EXISTS[$$FCTTBL(J TIN) 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL ( ) _TMI ) 

$$ DROPJTABLE_I F_EXI STS [$$ FCTTBL (} _FC ) 

$ $ DROP_TABLE_I F_EXI STS ( $ $ FCTTBL I ] TXN ) 

$$DROP_TABLE_IF_EXISTS (Concat_MFL) 

$ $ DROP__TAB L E IF_EXISTS [ $ $ FCTTBL { J _1ST] 

$$DROP_ w TABLE~IF_.EXISTS ($$ FCTTBL [ ]~IL) 

$ $ DROP TABLE_IF_EXISTS[$$FCTTBL[)_IR) 

$ $ DROP JT ABL E_I F_EX I STS ( S $ FCTTBL [ ) "i RD ] 

$$DROP_TABLE_IF_EXISTS ( $$ FCTTBL [ ) IND) 

$$DROP TABLE~IF EXISTS [$$ FCTTBL [) ~NFD) 
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$$DROPJTABLE_IF_EXISTS[$$FCTTBL[ J IRM] 

$ $ DROP_TABLE__I F_EX 1ST S [ $ $ FCTTBL {] ”l DM J 
$ $ DROP _TABLE_I F_EX 1ST S [ $ $ FCTTBL [ J ”l LM) 

$$DROP_TABLE_IF EXISTS [$$ FCTTBL [] IMIJ 
$$DDL_END ~ ” 

BLOCK_END# Dr opTempsAf ter 

--#TEMPLATE_END# load_state 
— STEM PLAT E_BEGIN# load_trans 

/♦♦■fr******************************************************************************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— load__trans 

Move transaction-like staging data into Fact table - create a temp 

— table with TXN extension that has all old rows along with new rows. 

— Also produce a TIN (TXN INC) table that has only the new rows 

— Note that the new table will also include all existing rows from 

— the Fact table. 



— Delete output tables 


- — Output table is called TXN and includes old and new rows 

— Also, leave around __TIN as incremental table from this 
-- procedure 

— We also create a table called _TMI which contains all the 

— _JTIN records plus the records of overlapping period from the 

— old existing fact table. 

/**************************^******,************. *********** . 4 * 44444 *** 44 * 444 * 44 **/ 

— #BLOCK_BEGIN# RemoveOutput 
$$DDL_BEGIN 

$$DROP_TABLE_IF EXISTS ($$ FCTTBL (] TXN] 

$$DROP~TABLE_IF~EXISTS [$$ FCTTBL [ ] ~TMI ] 

$$DROP_TABLE_IF“eXISTS ($$FCTTBL(]_TIN]‘ 

$$DDL_END 

— IBL0CK_END# RemoveOutput 

/ * * * * * * * * + **** + # + *********#* + +****+**** + ** + ******* + 4 **# + ****#******/ 

— Set join order for SQL Server 

/**** 444 ****** 4 * 4 ** 444 * 444444 * 4 ** 44 *** 4 **** 4444 * 4 * 44 * 4 4 444444444444 / 

— #BLOCK_BEGIN# ForcePlanOn 
$$SQLSERVER ( SET FORCEPLAN ON] 

-~#BLOCK_END§ ForcePlanOn 

/ 44 ** 4444 * 4 ********** 4 * 444 * 4 * 444*.**4 44 444 4 4*4 4 * 44 ** 444 / 

— Remove stuff already in fact table 

— Note that currently this filter implies that once a transactional 

— fact entry is made it cannot be changed - and no further fact 
-- entries on that date or any previous date can be made either 

/** 44 * 44 * 4 * 44 ** 44 * 4 ***** 444 *** 4 *** 4 *; 444 ** 4 * 4444 ***** 44 * 444444444 * 444444444444 * 4 ***/ 

--#BLOCK_BEGINII CreateTIN 

$$SELECT_INTO_BEGIN[$$ FCTTBL {] TIN] 

SELECT 
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S . iss, 
s .ss_key, 
s . date_key, 
s . transtype_key, 
s.ikey seq 
s.$$DIMKEYR_01 
s.$$DIMK£YR~02 
s.$$DIMKEYRJ)3 
S.$$DIMKEYR_04 
s .$$DIMKEYR_05 
3 .$$DIMKEYR_06 
S . $ SDIMKEYR 07 
s . $ $DIMKEYR_08 
S.$$DIMKEYR_09 
s . $$DIMKEYR_1 0 
s.55DEGKEY_01 
S.$$DEGKEY_02 
s . $ $DEGKEY 03 


t 


s.$$FCTCOL_001 
s . $$FCTCOL_002 
s. $$FCTCOL_003 
3 . $ $ FCTCOL_0 0 4 
s . $ $ FCTCOL_0 0 5 
s.$$FCTCOL_006 
3.$$FCTCOLJ)07 
s. $$FCTCOL_008 
S. $$FCTCOLJ)09 
s.$$FCTCOLJD10 
s.$$FCTCOL_011 
S.$$FCTCOL_OX2 
s . § $ FCTCOL_0 1 3 
S.$$FCTCOL_014 
s.$$FCTCOL_015 
s.$$FCTCOL_016 
s .$$FCTCOLJ)17 
s .$$FCTCOL_018 
s .$$FCTCOL_019 
s .S$FCTCOL_020 
s . $$FCTCOL_021 
s . $$FCTCOL_022 
S ,$$FCTCOL_023 
s . $$FCTCOL 024 


$$SELECT_INTO J BODY[$$FCTTBLn_TXN) 

FROM 

$$ FSTGTBL [ ) _MAP s, bus_proceS3 b 

WHERE 

NOT EXISTS (SELECT * FROM $$FCTTBL [ ] $$CURR f WHERE 
s.iss « f.iss AND 
3.ss_key - f.ss_key AND 
f.date key >= s.date key) 
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OR 

( s . $$ FCTCOL 019 

<> 

0) 

OR 

( s . $ $ FCTCOL 020 

<> 

0) 

OR 

( S , $$ FCTCOL 021 

<> 

0) 

OR 

(3.$$ FCTCOL 022 

<> 

0) 

OR 

( s . $ $ FCTCOL 023 

<> 

0) 

OR 

( s . $$FCTCOL 024 

<> 

0) 

AND 

J 




s .process_key =* 

b.process_ 

— #BLOCK_END# CreateTIN 



/****+*+#+»#•***»******#**«»**+**< 


— Set join order for SQL Server 
/**************■***********■**♦******★**** 

--#BL0CK_BEGIN# ForcePlanOff 

$$ SQLSERVER (SET FORCEPLAN OFF) 

— #BLOCK END# ForcePlanOff 






— CR158: We want to load JTMI table and still keep the non-descending 

— order so that the clustered index on a fact table can be created 

— without sorting. This way can speed up significantly in creating a 
-- clustered index on a very large already sorted fact table. 

— #BLOCK_BEGIN# CreateTMI 

$$SELECT_INTO_BEGIN[$$FCTTBL[) TMI ] 

SELECT ~ 

* 

$ $SELECT_INTO_BODY t $ $ FCTTBL ( ] TMI ] 

FROM “ 

$$ FCTTBL [ ) $$CURR 

WHERE 

date_key >=» (SELECT MAX (date key) FROM $$ FCTTBL [ ) TIN) 

UNION ALL 
SELECT 

* 

FROM 

$$ FCTTBL UjriN 
$$SQLSERVER (ORDER BY 
date key 
$$DIMKEYR_01 
$$DIMKEYR_02 
$$DIMKEYR_03 
S$DIMKEYR_04 
$$DIMKEYR_05 
$$DIMKEYR_06 
$$DIMKEYR_07 
$$DIMKEYR_08 
$$DIMKEYR 09 
$$ DIMKEYR^IO 


) 


— #BLOCK_END# CreateTMI 


— Insert everything into the new fact table 

/****t*.****o*****.*****«***,************ M ** t ** i 

--#BLOCK_BEGIN# CreateTXN 

$$SELECT_INTO_BEGIN($$ FCTTBL () TXN) 

SELECT "" ” 

# 

$$SELECT_INTO_BODY[$$ FCTTBL [) TXN) 

FROM 




****** / 
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$ $ FCTTBL [ ] 5SCURR s * 

WHERE s.date_key < (SELECT MAX (date key) FROM $$ FCTTBL [ ] TIN) 

UNION ALL ~ 

SELECT 

* 

FROM 

$$ FCTTBL n_TMI f 
— #BLOCK_END# CreateTXN 

/***********#*t*******t***»********#t**tt**t***+*******tt****+*********«**t*******/ 

-- Count inserted data and put results into communication table 

/*r**#************#*******.*****.»***.*. t .»*.**** # *. # *, # ,, (r .* w# * # ^,* t , <p### ^ ##1k### ^ ### , ###4 ,. fr+r# ^, ># . l|r ^ 

--#BLOCK_BEGIN# SPResults 
BEGIN 

INSERT INTO adaptive_template__ prof ile ( token_name, number_rows ) 

SELECT * PROCESSED* , COUNT (1) FROM $$FSTGTBL[)_MAP$$EOS 

INSERT INTO adaptive_template_prof ile ( token^name , number^rows) 

SELECT 'INSERTED 1 , COUNT (1) FROM $$ FCTTBL [) _T INS $ EOS 

ENDS $ EOS 

— # BLOCK_END# SPResults 

! — #TEMPLATE_END# load_trans 
— #TEMPLATE_BEGIN# index_fact 

/***************t*tt************************«**************************tt***t*****t***/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— Post processing after an extraction run 

— Reindex fact tables 

— CR158 : added WITH SORTED_DATA in creating cluster index on fact table 

— Remove any temp tables generated during the extraction 

************** ********** **************************.**.**.****.***.*.*****, 

/”************•*************•*•* ********** * ..**********************/ 

— Primary key index the fact table 

/********#****#«* + ****»****#••*«*»*•*»*************.**.**»*********#**•*****’************/ 

— #BLOCK_BEGIN# PKIndexFact 

$$DDL_BEGIN 

$$DDL_EXEC[ 

CREATE UNIQUE INDEX XPK$S FCTTBL [ J.SSNEXT ON $$ FCTTBL {] $$NEXT 

( 

iss , . ss_key , date_key , transtype_key , seq 

) 

) 

$$DDL_END 

-- ftBLOCK_END# PKIndexFact 

/*****************#***.* # ************ # **** ## ** # * ###### ** # ^ ### ^ # ^ ># . t .^ #lt . + ****** ## * ## *** # *y 

— Inversion index the fact table 

/*******■******************* * * *********************************************************/ 
--#BLOCK_BEGIN# lEIndexFact 
$$ DDL_BEGIN 

$$DDL EXEC [ 
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CREATE $$ SQLSERVER (CLUSTERED ] INDEX XIEK$$ FCTTBL ( J $$NEXT ON $ $ FCTTBL (] $$NEXT 


( 

date_key 

$$DIMKEYR_01 

$$DIMKEYR_02 

$$DIMKEYR_03 

$$DIMKEYR_04 

$$DIMKEYR_05 

$$DIMKEYR_06 

$$DIMKEYR_07 

$$DIMKEYR_08 

$5DIMKEYR_09 

$$DIMKEYR_10 

) $$ SQLSERVER [WITH SORTED_DATA] 


] 


$$DDL_END 

— # BLOCK END# IEIndexFact 


/* 


-- Remove any mapped tables 


— #BLOCKjBEGIN# RemoveTemps 
$$DDL_BEGIN 

$ $DROP_TABLE_IF_EXISTS ( $$FSTGTBL [ J MAP] 
$$DDL_END “ 

--#BLOCK_END# RemoveTemps 

— #TEMPLATE_END# index_fact 
— #TEMPLATE_BEGIN# ren trans 


Copyright * 1997, Epiphany Marketing Software, Inc. All Rights 
ren_trans 

— Epiphany Marketing Software, 1997 

Simply change the name of the transaction new table to the 
actual fact table name - used for Fact tables that don't have 
any stored procedure other than load_trans attached to them 


Reserved. 


*********** 








— Delete the output tables 




r**t**^ 
r * * * * * f 
**♦**/ 


-#BL0CK_J5EGIN# RerooveOutput 
$$DDL_BEGIN 

S $ DROP JT ABLE I F_EXI STS ( $ $ FCTTBL (} $ $ NEXT ] 
$$DROPJTABLE~IF_EXISTS[$$FCTTBL(] INC] 

$$DDL_END ~ 

--#BLOCK_END# RemoveOutput 

/ .**** t »*.»**.*.***,** to *.* o ***.* o ..*****.********** to# , 1 

— Move ail transaction rows into the correct new fact table 
name. Note that we would use sp__rename, except it 

— doesn't work with DB name prefixes 


******* > 


— TBD : Rename instead of re-select 
************♦**.#**.*****.******.********* 
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--#BLOCK_BEGIN§ BuildNewFact 

5 5 S ELECT_INTO_BEG IN ( $$ FCTTBL [ ) $ $ NEXT ] 

SELECT 

* 

$$SELECT_INTO_BODYt$$FCTTBL[l$$NEXTl 

FROM 

$$ FCTTBL ( ]_TXN 
-*-#BLOCK_END# BuildNewFact 

— Preserve incremental table 

/**#******.**t«************* t * t# * #to * itt * t4tl 

— #BLOCK_BEGIN# Buildlncremental 

$ $SEL£CT_INTO_BEGIN ( $ $ FCTTBL U INC J 
SELECT 

* 

5$SELECT_INT0 BODY [ $ $ FCTTBL [ ] INC] 

FROM 

$$ FCTTBL [JJT IN 


--#BLOCK_END# Buildlncremental 


/***'******************'***********♦**■**■**■****★#*********** 
-- Count inserted data and put results into communication 


******* 

table 


k* ** ***» f 


— #BLOCK_BEGIN# SPResults 
BEGIN 

INSERT INTO adaptive__template_jprof ile (token name, number rows) 
SELECT 'PROCESSED', COUNT (1) FROM $$ FCTTBL (]JTXN$$ EOS 

INSERT INTO adaptive template prof ile (token name, number rows) 
SELECT 'INSERTED', COUNT (1) FROM 5 $ FCTTBL J ]_TXNS$ EOS 

ENDS $ EOS 

# BLOCK_END# SPResults 

-- Remove temp tables 

• — # BLOCK__BEGIN# RemoveTemps 
$$DDL__BEGIN 

$$DROP_TABLE_IF_EXISTS [$$ FCTTBL {) TXN] 

$$DROP_TABLE_IF EXISTS ( 5 $ FCTTBL [J _ T IN] 

$SDROPJTABLE_IF EXISTS [ 5$ FCTTBL(] TMI] 

$$DDL_END " “ 

-- #BLOCK_END# RemoveTemps 

— #TEMPLATE_END# renjrans 

— #TEMPLATE_BEGIN# map^keys 








Copyright * 1997, Epiphany Marketing Software, Inc. 

— map_keys 

— Epiphany Marketing Software 


All Rights Reserved. 
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-r- Map dimension keys from Staging table and report 
-- on unjoined rows 

/♦***t**#****»******* #t ** ti ,***** t *^^^ t##itt#ttik#t ^ ti0t 

/***.* t ********. tt ******** 4 *,** tM * 0##t#t#4t#t##00ttt ^ 4 

-- Remove output table 

/***************************♦**********•****###*#**#■#***** 
--#BLOCK_BEGIN# DropTemp 
$ $DDL_BEGIN 

$$DROP_TABLE_IF_EXISTS [$$FSTGTBL[J MAP) 

$$DDL_END 

— #BLOCK_END# DropTemp 


* * */ 
:**/ 


— Set join order for SQL Server 

/*.*...**..*.**.******,* # *.**^ 0 * 0tt# 

— # B LOCK_BEG IN# ForcePlanOn 
$$ SQLSERVER [SET FORCE PLAN ON) 

— Iblock END# ForcePlanOn 




"• Map dimension keys via Inner joins 

/•***««***»«tt****«*****«t«**t**t««**«***44*4**«**«»*i 

— #BLOCK_BEGIN# MapAll 

$$SELECT_INTO_BEGIN [ $ $FSTGTBL [ ) MAP) 

SELECT 

s.iss, 
s .ss_key, 
s.date_key, 
s . transtype^key, 
s.ikey, 

s .process_key 
, $$PIPE STATE 




ra_04 
m_03 
m_06 
m_02 
m_08 
mj)5 
m_09 
m_01 
m_07 
m 10 


. $$ DIMKEY 
. $$ DIMKEY 
.SSDIMKEV" 

.$$ dimkey - 
.$$dimkey’ 

. $$DIMKEY~ 
.$$ DIMKEY - 

,$$dimkey - 

.$$dimkey" 

.$$dimkey“ 


04 $ $ DIMKEYR_04 
03 $$DIMKEYR_03 

06 $$DIMKEYR_06 
02 $ $ DIMKEYR_02 

08 $$DIMKEYR_08 

05 $$DIMKEYR_05 

09 SSDIMKEYR 09 
01 $$DIMKEYR~01 

07 $$DIMKEYR_07 

10 $ $ DIMKEYR 10 


$$DEGKEY_03 

$$DEGKEY_02 

$$DEGKEY_01 

s.$$FCTCOLJD01 
s . $$FCTCOL__002 
S.$$FCTCOL“003 
a.$$FCTCOL_004 
s . $$FCTCOL 005 
3.5$ FCTCOL_0 0 6 
s.$$FCTCOL_007 
s . $$FCTCOL 008 
s.$$FCTCOL~009 
s . $ $ FCTCOL_0 1 0 
s . $ $ FCTCOL__0 1 1 
S.$$FCTCOL_012 
s.$$FCTCOL 013 
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S . $ $FCTCOL_014 
s.$$FCTCOL_015 
s .$$FCTC0LJ316 
s .$$FCTC0LJ>17 
s .$$FCTCOL~018 
S .$$FCTCOL_019 
3 . $ $ FCTCOL___02 0 
s.$$FCTCOL_021 
S . $ $ FCTCOL_0 2 2 
s.$$FCTCOL~023 
S.$$FCTC0LJ)24 

$$SELECT_INTO_BODY [$$FSTGTBL [ ] . 
FROM 

$$F5TGTBL( ] S 

, $$MAPTBL_04$$NEXT m_04 

$$MAPTBLj)3$$NEXT ro_03 
$$MAPTBL_06$$NEXT m_06 
, $$MAPTBL 02$$NEXT mj>2 

# S$MAPTBC08$$NEXT ra_08 

. $$MAPTBL 05$$ NEXT m_05 

, $$MAPTBL~09$$NEXT m_09 

$$maptbl~oi$$next m_01 

. $$MAPTBL_07$$NEXT m_07 

, $$MAPTBL 10$ $NEXT ra_10 


WHERE 1' 
AND 
AND 
AND 
AND 
AND 
AND 
AND 
AND 
| AND 
AND 


m_04.iss 
m_03.iss 
m_06.iss 
ro__02 . iss 
m_0 8 . i s s 
m_Q5 .iss 
m_09.iss 
ra_01 .iss 
m_07 .iss 
nTlO.iss 


$$ SQLSERVER ( (indc 
$$ SQLSERVER! (inde 
SS SQLSERVER! (indt 
$$ SQLSERVER l (ind< 
$$SQLSERVER! (ind« 
$$ SQLSERVER! {ind< 
$$ SQLSERVER! (ind< 
$$ SQLSERVER! (ind< 
$$ SQLSERVER! (ind< 
$$ SQLSERVER! ( ind 

04 . $ $ DSTGKEY_0 4 
~O3.$$DSTGKEY_03 
~06.$$DSTGKEY_06 
~02.$$DSTGKEY_02 
“08.$$DSTGKEY_08 
~05 .$$DSTGKEY_05 
'09.$$£>STGKEY_09 
"~0 1 . $ $ DSTGKEY__0 1 
“07 .$$DSTGKEYJ37 

“io.$$dstgkey2io 


S.$$DSTGKEYR_04 
S .$$DSTGKEYR_03 
s . $ $ DSTGKEYR^O 6 

3 .$$DSTGKEYR_02 
S.$$DSTGKEYR~08 

3 . $ $ DSTGKEYR_0 5 
, S .$$DSTGKEYR_09 
. S .$$DSTGKEYRJ)1 
. S.$$DSTGKEYR_07 
. s . $$DSTGKEYR__10 


— # BLOCK END# MapAll 


♦•*** 

— #BLOCK_BEGIN# ForcePlanOff 
$$ SQLSERVER !SET FORCEPLAN OFF] 

— #BLOCK_END# ForcePlanOff 

............. * * 

-- Look for unjoined 

^♦e****************************** 

— #BLOCK_BEGIN# SPResults 

$$ DECLARE J1EGIN c , pOTm , 

$ $ DECLARE_BODV l S S VAR ( un j oined) $ SEPI IHT ] 

$ $ DECLARE BODY l $$VARt processed] $$EPIINU 


$ 5 VAR_ASSIGN_BEGIN [process ed] 

SELECT COUNT (1) 

$$VAR_ASSIGN INTO [processed] 

FROM $$FSTGTBL[) 

$ $ V AR_ASS I GN_EN D 

. $$VAR_ASSIGNJJEGIN{ unjoined] 

SELECT $$VAR[processed] - COUNT (1) 

S S VAR ASSIGN INTO [ un joinedj 
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FROM $$ FSTGTBL (]_MAP 

$ $ V AR_AS S I GN_END 

INSERT INTO adaptive_template_prof ile (token^name, number rows) 

SELECT 'UNJOINED', $$VAR( unjoined) $ $NO_FROM_LIST$$EOS 

INSERT INTO adaptive_template_prof ile <token_name, number rows) 

SELECT 'PROCESSED', $$VAR [processed] $$NO_FROM_LIST$$EOS 

INSERT INTO adaptive_template_prof ile (token_name, number rows) 

SELECT 'INSERTED', $$VAR(processed} - $$VAR[unjoined] $$NO_FROM_LIST$$EOS 

ENDS $ EOS 

- - # BLOCK^END# SPResultS 


/*#«********** + * + ****** + *»*«. # 4 

-- Index this temp table 


»4******«t**> 


--#BLOCK_BEGIN# IndexMap 

$$DDL_BEGIN 

$$DDL_EXEC[ 

CREATE INDEX X$$FSTGTBL{J MAP ON $$ FSTGTBL { ] MAP 

( 

iss, ss_key, date key, ikey 

) 

J 

$$DDL_END 

— »BLOCK_END# IndexMap 

— #TEMPLATE_END§ raapjceys 
— #TEMPLATE_BEGIN# upd_unj 


******i*******t***t*****< 






— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved 
-- upd_un j 

Epiphany Marketing Software 

— Update all dimension keys to 'UNKNOWN* in staging table 

— where referential integrity fails 








► **** / 


-- Count the number of rows to update in the staging table - that is, those 
-- that have at least one Foreign key where referential integrity fails 

" * >*********•**************•*********♦***' j 




— #BLOCK_BEGIN# CountUnj 
BEGIN 

INSERT INTO adaptive_template__prof ile ( token_name, number rows) 
SELECT 'PROCESSED', COUNT (1) FROM $ $ FSTGTBL ( J $ $ EOS 


INSERT INTO adaptive_template profile (token name, number rows) 

SELECT 'MODIFIED', COUNT ( 1 ) 

FROM 

$$ FSTGTBL ( ] s 
WHERE 1 <=>0 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_0 4SSNEXT m_04 WHERE m 04. iss = s.iss AND 
m_04 .$$DSTGKEY_04 “ $$DSTGKEYR_04 ) . “ . 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_03$$NEXT m 03 WHERE m 03.iss - s.iss AND 
m_03 . $$DSTGKEY_03 « $$DSTGKEYR 03) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 06$$NEXT m 06 WHERE m 06. is s = s.iss AND 
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m _06. $$DSTGKEY_06 = $$DSTGKEYR_06) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 02$$NEXT m 02 WHERE m 02 
m_02 . $$DSTGKEY_02 « $ 5 DSTGKE YR_Q2 ) ~ ~ 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 08$$NEXT m 08 WHERE m 08 
m_08.$$DSTGKEY_08 ° $$DSTGKEYR_08 ) “ “ 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 05$$NEXT m 05 WHERE m 05 
m_05.$$DSTGKEY_05 « $$DSTGKEYRJD5 ) - - ~ 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 09$$NEXT m 09 WHERE m 09 
m_09.$$DSTGKEY_09 « $$DSTGKEYR_09 ) ~ ~ 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 01$$NEXT m 01 WHERE m 01 
mJ)l.$$DSTGKEY_01 = $$DSTGKEYR_01 ) ~ 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 07$$NEXT m 07 WHERE m 07 
1 m_07.$$DSTGKEY_07 « $$DSTGKEYR_07 ) ” ” 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 10$$NEXT ra 10 WHERE m 10 
m_10.$$DSTGKEY_10 = $$DSTGKEYR 10) “ “ “ 

$5 EOS ~ 

END$$EOS 

--#BLOCK_END# CountUnj 

/******** # ******** # *******'*‘** # *'********'******^******’**********i 

~r* Update forei 9 n ke Y 3 where referential integrity fails 


i_02.iss = s.iss AND 
i_08.iss «= s.iss AND 
i_05.iss * s.iss AND 
i_09.iss “ s.iss AND 

i 01 . iss » s.iss AND 

_07.iss “ s.iss AND 
_10.iss » s.iss AND 


— #BLOCK_BEGIN# Upda teUn j $ $ DSTGKEYR_04 

UPDATE $$ FSTGTBL ( ] SET $ $DSTGKEYR__04 = * UNKNOWN ' 

WHERE NOT EXISTS (SELECT 1 FROM $ $MAPTBL_04$$NEXT ra 

WHERE ra. iss “ $$ FSTGTBL () . is s AND ra. $$DSTGKEY_04 = $ $ FSTGTBL ( ) . 

— # BLOCK_END « Upda t e Un j $ $ DSTGKE YR_0 4 

--#BLOCK_BEGIN# UpdateUnj $ $DSTGKEYR_03 

UPDATE $$FSTGTBL ( ) SET $ $ DSTGKEYR_0 3 - * UNKNOWN * 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_03$$NEXT ra 

WHERE ra.iss “ $$ FSTGTBL (). iss AND m. $$DSTGKEY_03 “ $$FSTGTBL(). 

— #BLOCK_END# UpdateUnj $$DSTGKEYR_0 3 

— # BLOCK_BEGIN# UpdateUnj $ $ DSTGKEYRJD 6 

UPDATE $$ FSTGTBL () SET $$DSTGKEYR_06 = 'UNKNOWN* 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_06$$NEXT III 

WHERE m.iss » $$FSTGTBL [ ] . iss AND m. $$DSTGKEY_06 » $$ FSTGTBL () . 

— #BLOCK_END# UpdateUnj $$DSTGKEYR_06 

— #BLOCK_BEGIN# UpdateUn j$$DSTGKEYR_02 

UPDATE $$FSTGTBL [ ] SET $ $ DSTGKEYR_02 «* ’UNKNOWN* 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_02$$NEXT ra 

WHERE ra.iss = $$FSTGTBL() . iss AND ra. $$DSTGKEY_02 « $$ FSTGTBL [] . : 


$$DSTGKEYR 04) 


$$DSTGKEYR 03) 


$$DSTGKEYR 06) 


$$DSTGKEYR 02) 


— #BLOCK_END# UpdateUnj $$DSTGKEYR__02 

--#0LOCK_BEGIN# UpdateUnj $$DSTGKEYR_08 

UPDATE $SFSTGTBL[] SET $$DSTGKEYR_08 ».* UNKNOWN * 

WHERE NOT EXISTS (SELECT .1 FROM $$MAPTBL_08 $$NEXT m 

WHERE m.iss « $$ FSTGTBL (). iss AND ra. $$DSTGKEY_08 - $$ FSTGTBL [) . 

--#BLOCK_END# UpdateUn jS$DSTGKEYR__0 8 

--#BLOCK_BEGIN# UpdateUnj $ $DSTGKEYR_05 

UPDATE $$ FSTGTBL (] SET $$DSTGKEYR_05 = ’UNKNOWN* 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_05$$NEXT ra 

WHERE m.iss » $$ FSTGTBL (). iss AND m. $$ DSTGKEY_05 = $$ FSTGTBL [ ) . 


S5DSTGKEYR 08) 


$$DSTGKEYR 05) 


— # BLOCK EN D# UpdateUnj SSDSTGKEYR 05 
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--#BLOCK_BEGIN# UpdateUn j $$DSTGKEYR_09 

UPDATE $$FSTGTBL ( J SET $ $DSTGKEYR 09 = ' UNKNOWN ' 

WHERE NOT EXISTS (SELECT 1 FROM $ $MAPTBL_09$$NEXT m 

WHERE m.iss - $$ FSTGTBL (] . isa AND m. $$DSTGKEY_09 « $$ FSTGTBL ( ] . $$DSTGKEYR_09) 

— #BLOCK_END# UpdateUn j $$DSTGKEYR 09 

--#BLOCK_BEGIN# UpdateUnj $$DSTGKEYR_01 

UPDATE $$ FSTGTBL (] SET $$DSTGKEYR_01 « 'UNKNOWN 1 
WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL__01$$NEXT m 

WHERE m.iss “ $$FSTGTBL (] . iss AND m. $$DSTGKEY__01 = $$ FSTGTBL [}. $$DSTGKEYR 01) 
— #BLOCK_END# UpdateUn j $ $DSTGKEYR_01 

— #BLOCK_BEGIN# UpdateUn j $$DSTGKEYR_07 

UPDATE $$ FSTGTBL [ ) SET $$DSTGKEYRJ)7 = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_07$$NEXT m 

WHERE m.iss - SS FSTGTBL M . iss AND m. $$DSTGKEY_07 - $$FSTGTBL ( ) . $$DSTGKEYR_07) 

— # BLOCK_ENDI UpdateUnj $ $ DSTGKEYR_07 

--§BLOCK_BEGIN# UpdateUnj $$DSTGKEYR_10 

UPDATE $$ FSTGTBL l ) SET S $ DSTGKEYR_i0 - 'UNKNOWN* 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_10$$NEXT m 

WHERE m.iss « $$FSTGTBL [ ] . iss AND ra. $$DSTGKEY_10 - $ $ FSTGTBL (] . $ $ DSTGKEYR_1 0 ) 

— #BLOCK_END# UpdateUnj $ $ DSTGKEYR_1 0 


— #TEMPLATE_END# upd_unj 


The following are the post-parsed SQL source for the adaptive templates as filled in with 


corresponding schema definitions. 


— #TEMPLATE_BEGIN# force_close 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— force_close 

Close out deleted orders - those that no longer appear in the 

— staging table 

— SEE SAFETY VALVE BELOW 


— Delete temporary tables 
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--#BLOCK_BEGIN# DropTemps 


2 DRO^TABLE^Order O^C 3ysob;iec,:s WHERE id - objected Cdbo . Order_0_FC • ) AND sysstat i Oxf = 


- - # BLOCK_EN D# DropTemps 

/****#«***#*****t**t***+*#****+* t ** #t#i#t##t4< 

-- Insert negative BOOKs for deleted orders 
— FC: ForceClose 

/******** ****************************** 

— # BLOCK BEGINS MakeFC 


SELECT 






k ******* 


f . iss, 
f . ss_key, 

MAX (f .date_key) date_key, 

MIN ( f . trans type_key) transtype key, 

MAX ( f . seq) + 1 seq 
f . customerbillto_key 
f . product_key 
f . application_key 
f .program_key 
f . cu stonier shipto_key‘ 
f . territory^key 
f . warehouse_key 

-SUM ( f .net__price) net^price 
-SUM { f .number^units ) number_units 

INTO Order_0_FC 
FROM 

Order_0_A f 

WHERE 

NOT EXISTS 

(SELECT 1 FROM OrderStage MAP s WHERE s.iss = f.iss AND s.ss key - f.ss key) 
GROUP BY “ “ 1 - J 

f.iss, 
f . ss_key 

f .customerbillto_key 
f . product_key 
f . application_key 
f . programme y 
f . customershipto_key 
f . territory_key ~ 
f . warehouse_key 


HAVING 


OR 

AND 

AND 


( 

(SUM ( f .net_price> <> 0) 
(SUM ( f . number units) <> 0) 
) 


MIN { f . trans type_key) <= 99 
MIN { f . trans type_key) >= 1 
#BLOCK END# MakeFC 


-- SAFETY VALVE - THIS PROC ONLY DOES ANYTHING 
-- IF . THE STAGING TABLE HAS AT LEAST ONE ROW 
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— #BLOCK_BEGIN# SafetyValue 
DECLARE 0COUnt_MAP INT 
BEGIN 

SELECT @COUnt_MAP “ ( 

SELECT COUNT <1 ) 

FROM Orders tag e_MAP 

) 

IF ( (@count_MAP - 0) ) 

DELETE FROM Order 0 FC 


* + **•**»*< 




*•****-*-*"**#*#***# 


rows ) 
rows) 


END 

— #BLOCK_END# SafetyValue 

/**-*»************* + *-**#*#fr**** + **.*** # * + **.. ##4 . ## 4 #ir## . ft4lk# 4, fr , 

~~ Count processed, inserted rows 
/*******************.* # * + ********** # ******* # ^ ###1####i######i 

--#BLOCK_BEGIN# SPResults 

BEGIN 

INSERT INTO adaptive_template_prof lie (token name, number 
SELECT 'PROCESSED', COUNT (1) FROM 0rder_0_A 

INSERT INTO adaptive_template_jprof ile (token name, number 
SELECT 'INSERTED', COUNT (1) FROM Order_0_FC 

END 

--#BLOCK_END# SPResults 
--ITEMPLATE END# force close 


--#TEMPLATE_BEGIN# load_state 

/*********....,* t *** t ^*,* t „* t# * 4# * ***** *********** ************** , 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— load__state 

““ Load order bookings into fact table by creating transactional 
-- data from state data 

load__trans must be run before this procedure to create TIN table 


♦ ***/ 

f 






* * * * * f 
f****/ 


/************************************** 

-- Delete temporary tables 

--#BLOCK_BEGIN# DropTeraps 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id “ object id (' dbo .Order 0 MFL * ) AND sysstat & Oxf 
« 3) DROP TABLE Order_0_MFL “ . 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id » object id (' dbo .Order 0 1ST') AND sysstat & Oxf 
- 3) DROP TABLE Order_0_lST “ 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id *» object id (' dbo .Order 0 IL') AND sysstat & Oxf ** 
3) DROP TABLE Order_0_IL - “ - 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id - object id ( 'dbo .Order 0 IR*) AND sysstat & Oxf = 
3) DROP TABLE Order 0 IR ~ 
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IF EXISTS 
« 3) DROP 
IF EXISTS 
= 3) DROP 
IF EXISTS 
« 3) DROP 
IF EXISTS 
= 3) DROP 
IF EXISTS 
= 3) DROP 
IF EXISTS 
= 3) DROP 
IF EXISTS 
« 3) DROP 


— #BLOCK_END# DropTemps 

/*******..*.********************* 
— Set join order for SQL Server 


(SELECT 1 FROM sysobjects 
TABLE Order 0 IRD 

WHERE 

id 

d 

ob j ect_id ( ■ dbo . Order 

jT 

_IRD ' ) 

AND 

sysstat 

~ 

Oxf 

(SELECT 1 FROM sysobjects 
TABLE Order 0 IND 

WHERE 

id 

= 

ob j ect_id ( * dbo . Order 

_o_ 

IND * ) 

AND 

sysstat 

& 

Oxf 

(SELECT 1 FROM sysobjects 
TABLE Order 0 NFD 

WHERE 

id 

■ 

ob j ect_id ( ' dbo . Order 

_0_ 

_NFD* ) 

AND 

sysstat 

& 

Oxf 

(SELECT 1 FROM sysobjects 
TABLE Order_0_IRM 

WHERE 

id 

= 

ob ject_id ( 'dbo.Order_ 

_0_ 

_IRM ' ) 

AND 

sysstat 

& 

Oxf 

(SELECT 1 FROM sysobjects 
TABLE Order 0 I DM 

WHERE 

id 


ob j ect_id ( • dbo . Orde r_ 

A 

JDM') 

AND 

sysstat 

& 

Oxf 

(SELECT 1 FROM sysobjects 
TABLE Order_0_ILM 

WHERE 

id 


objected ( 1 dbo . Order 

_o_ 

_I LM * ) 

AND 

sysstat 

& 

Oxf 

(SELECT 1 FROM sysobjects 
TABLE Order 0 IMI 

WHERE 

id 

= 

ob jectJLd ( 1 dbo . Order_ 

_o_ 

IM! * ) 

AND 

sysstat 

& 

Oxf 




-~#BLOCK_BEGIN# ForcePlanOn 
SET FORCEPLAN ON 
--#BLOCK_END# ForcePlanOn 

/*”"************♦*******♦************************************* ********** 

Remove rows older than fact table - history can not be rewritten - only 
the last date for an order can be changed. Note that we compare transtype’s 
because SHIP type transactions might occur at a later date and we don't want 
those to interfere 

Also, since the staging table may have multiple entries for a given order on 
a single day - we assume that the list one inserted in the Staging table will 

— be used (since ikey is an IDENTITY column) 

— Note that a given ss_key must use the same Booking transtype for all of time, 
otherwise the transtype_key 


-- MFL : Mapped Filtered 


******* > 


~§BLOCK_BEGIN# MakeMFL 


SELECT 

s . * 

INTO Order_0_MFL 
FROM 

OrderStage_MAP s, bus_process b 


WHERE 


AND 


AND 


( ( s -date_key >«= (SELECT MAX (date_key) FROM 0rder_0_A f WHERE 
s.iss « f.iss AND s.ss_key « f.ss_key AND 
s. transtype_key “ f . transtype_key) ) 

OR NOT EXISTS (SELECT * FROM Order_0_A f WHERE 

s.iss “ f.iss AND s.ss_key «■ f .sskey AND 
s . transtype — key « f . transtype_key) ) 
s. ikey « (SELECT MAX (t. ikey) FROM OrderStage_MAP t WHERE 
s.iss * t.iss AND “ 

s.ss_key « t.ss_key AND 

s. date_key = t.date_key AND 

t . process_key » b.process_key) 


s . process key ■ 

— #BLOCK END# MakeMFL 


b.process_key AND b .process_name 


/******* ********* 

— Index MFL table for later queries 


************************ 


’ LoadState * 
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— #BLOCK BEGIN# IndexMFL 


EXEC < ' 

CREATE INDEX XOrder_0_MFL ON Order 0 MFL 


is s, ss_key, date_key 
') 


BLOCK_END# IndexMFL 

— Get oldest state rows for each unique sskey 

we need to treat the first entry for each order 

— in the staging table separately from all others, since 
-- only the first entry needs to be compared with 

already existing fact entry rows to create transactions. 

All subsequent dates for that order in the Fact table 
can be delta 'd with other staging table entries - see the 

— section below on Pairwise deltas. 

-- MFL should be indexed 

/I*l*T**I***f irSt record for each iss, ss_key 

— #BLOCK_BEGIN# MakelST 

SELECT 

s . * 

INTO Order_0_lST 
FROM 

Order_0_MFL s 

WHERE 

s.datejcey - (SELECT MIN (datejcey) FROM Order 0 MFL t WHERE 
s.iss - t.iss AND s.ss_key =» t.ss_key) 

— # BLOCK_EN D # MakelST 




“ Index 1ST for later queries 
— #BLOCK_BEGIN# IndexlST 


EXEC ( ' 

CREATE UNIQUE INDEX XPKOrder_0_lST ON Order_0 1ST 
iss, ss_key 
) 


— # BLOCK__END§ IndexlST 


/** 


- Insert negative BOOKs for changed dim keys 

This query will add up all existing Books and Loss's 
for thi3 order and the net facts will be cancelled out 
-- with the old Dimension keys. Note that an invariant of this 
procedure is that only one set of dimensions at a time 
can have non-zero facts. 
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— Fact table Should be indexed 


HAVING Clause is needed to prevent changing of dimensions 
on fully shipped order from causing a transaction - no sense 
creating fact rows with all zero's in them 

Note that we increment the sequence number just in case 
this new transaction occurs on the same date as the last 
existing one in the fact table - to avoid index errors 

IL: InsertLost 


~#BLOCK BEGIN# MakelL 


s . iss, 
s . ss_key, 
s . date_key, 
s . transtype_key, 

MAX ( f . seq) + 1 seq 
r f .custoraerbillto_key 

, f .product_key 

, f .application_key 

, f .program_key 

$ f . custoraershipto_key 

, f . territory_key 

, f . warehouse_key 

, -SUM ( f . net_price ) net_price 

* -SUM ( f . number_units ) number_units 

INTO Order_0_IL 
FROM 

Order_0 1ST s, Order 0 A f 

WHERE 

s.iss « f.iss AND s.ss_key « f.ss_key 

AND 

{ (s . territory_Jcey <> f . territory_key) OR 
(s . customershipto_key <> f . customershipto__key) OR 
( s . warehouse_key <> f . warehouse_key) OR 
(s . program_key <> f .program_key) OR 
(s . application_key <> f . application_key) OR 
(s . product_key <> f .product_key) OR 
(s . customerbill to_key <> f . customerbill to key) ) 
GROUP BY ~ “ 

s . iss, 
s. ss key, 
s.date_key, 
s . transtype_key 

# f .customerbillto_key 

, f . product_key 

, f . application_key 

, f .program__key 

, f . customershipto_key 

, f . territory__key 

, f . warehouse_key 


MIN ( f . transtype__key) * s . transtype_key 


{SUM ( f . ne t_price ) <> 0) 
(SUM(f .number units) <> 0) 


-# BLOCK END# MakelL 




— Index IL for later 
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-- ftBLOCK BEGIN# IndexIL 


EXEC ( » 

CREATE INDEX XPKOrder _0_IL ON Order_0_IL 
( 

iss, ss_key 

) 

*) 


- -#BLOCK_END# IndexIL 

/***t*******t*#**»**********»*****t*********<*t*************** t ********* tt#tt4tttt * t y 

-- Insert BOOKS for changed dim keys 

-- When a dimension changes then just create a booking 

— transaction for whatever we negated above with the new 
-- dimension and fact values 

— 1ST shoud be indexed 

— Note that we add one to whatever we used as the last 
seq because this transaction occurs on the same 
date as the negative one above 

— IR: Insert Rebook 

* * ****** * ******** 

— #BLOCK BEGIN# MakeIR 


SELECT 

s.iss, 
s . ss_key, 
s.date_key, 

1 . transtype_key, 
l.seq + 1 seq 

, s . customerbillto__key 

, s . product__key 

, s . application_key 

, s . program^ key 

, s . cus tomershipto_key 

, s . territory_key 

, 3 . warehouse_key 

, -l.net_price net_price 

/ -1 . number_unit s number_units 

INTO Order_0_IR 
FROM 

Order_ 0 — IL 1, Order_0_lST s 
WHERE l.iss — s.iss AND l.ss_ key *= s.ss^key 

-~#BLOCK_END# MakeIR 

/***t*t*****»*»**»t«*»»**«***»*»**»t***li4**ttt •************«******+#**********#**+*/ 

-* Insert BOOKS for changed dim keys where fact 

— also changed 

— When a dimension changes at the same time as 

— a fact then we need to make up the fact difference 

— 1ST shoud be indexed 

— Note that we add two to whatever we used as the last 

— seq because this transaction occurs on the same 

— date as the negative and positive ones above 
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-- Note also that the Left Outer join uses transtype_key 
-- so that only the Bookings at the old value will be counted. 
-- Whereas above for the negative transaction value 

— we want to include Shipments in our calculation, here 
we only want to see how Booking Facts have changed. 

Here again, only one Booking transaction type is supported 
-- per ss_key 

— IRD: Insert Rebook delta 
“~#BLOCK BEGIN# MakeIRD 


SELECT 

s . iss, 
s . ss_key, 
s.date_key, 
s . transtype_key, 
l.seq + 2 seq 

, s . customerbillto_key 

, s . product_key 

, s • appli ca t ion_key 

, s . program_key” 

, s . customershipto_key 

, s . territory_key 

, s . warehouse_key 

t MAX (s. net _price) -ISNULL (SOM ( f . net_price ) , 0) net_j>rice 

» MAX (s . number__units ) -ISNULL (SUM ( f . number_units ) # 0) number_units 

INTO Order_0_IRD 
FROM 

Order_0_IL 1, 0rder_0 1ST s 
LEFT OUTER JOIN Order__0_A f 
s . transtype_key - f. transtype key 
WHERE 

l.iss «* s.iss AND l.ss_key 

GROUP BY 

s.iss, 
s . ss_key, 
s.date_key, 
s . transtype_key, 
l.seq 

, s . cus tomerbillto key 

, s . product key 

, s . application^key 

, s .program_key~ 

, s . customershipto_key 

, s . territory_key 

, s . warehouse_key 

HAVING 

( ISNULL (SUM(f.net_price) , 0} <> MAX(s .net_price) ) 

OR ( ISNULL (SUM <f.number_units> , 0) <> MAX (s . number_units) ) 

--#BLOCK_END# MakeIRD 

/********.**********o*o***#***t.,****.f************,o******t****t..*.*t**t*******/ 

“• Insert BOOKS for deltas with same dim keys OR for 
-- brand new orders. 

— Note that we DON’T want to count Shipments 

— (so shipment ss_key*s should be different from 

— order ss_keys) since we just want bookings to sum up 

— to whatever this transcation says they should be. 

-- Fact table should be indexed 


ON s.iss - f.iss AND s.ss_key *» f.ss_key and 
= s.ss_key 
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WHERE clause prevents double booking on changed 
dimension - if we didn’t use the NOT EXISTS clause 
then this query would repeat the work of the last one 
above - which we have already taken care of 

HAVING clause ensures that multiple 0 records don't 
get inserted whenever this procedure is run 

Note that we increment the sequence number just in case 
this new transaction occurs on the same date as the last 
existing one in the fact table - to avoid index errors 


-- IND: Insert New Delta 
/***************** 








— #BLOCK BEGIN# MakeIND 


SELECT 


s . iss, 
s . ss_key, 
s .date^key, 
s . transtype__key , 

ISNULL (MAX ( f . seq) , 0) + 1 seq 
s . customerbillto_key 
s .product_key 
s . application_key 
s .program_key 
s . customer shipto_key 
s . territory_key ~ 
s . warehouse_key 

MAX ( s.ne t_pr ice) -ISNULL (SUM (f.net_price) , 0) net_price 
MAX <s .number_units) -ISNULL (SUM < f .nurober_units) , 0) number_units 

INTO Order_0_IND 
FROM 

Order_0_lST s LEFT OUTER JOIN Order_0_A f ON 

s. iss « f.iss AND s.ss_key = f.ss_key AND f . transtype_Jcey « s . transtype_Jcey 


WHERE 


NOT EXISTS (SELECT * FROM Order_0__IL WHERE iss ** s.iss AND ss_ key ■» s.ss^key) 


GROUP BY 

s . iss, 


HAVING 

OR 


s.ss_key, 

s . date_key, 

s . transtype_key 

s. customerbIllto_key 

s .product_key 

s . application_key 

s .program key 

s . cus tomershipto^key 
s , territory_key 
s . warehouse^key 


(ISNULL (SUM ( f.net_price) , 0) <> MAX (s . net_price) ) 
(ISNULL (SUM( f , number_units ) , 0) <> MAX (s. number units)) 


— « BLOCK END# MakeIND 










Form pairwise deltas for ali rows except earliest for each sskey 

— Each row created in NFD will consist of two sequential entries from the 

staing table. So if N enties for an order exist in MFL (after we have filtered 
out same-date duplicates) then all the queries above will deal with the earliest entry, 
whereas 

the queries below (including this one) will deal with the N-l deltaing transactions 
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— This query assumes that MFL will already have been filtered 
-- to have a single record for each order/datekey 

-- NFD: Not First Delta 

/******** *♦***.********.♦*.*.******** **..*****************,„* 

--#BLOCK BEGIN# MakeNFD 


SELECT 

s.iss siss, t.iss tiss 
, s.ss_key sss_key, t.ss_key tss_key 

, s.date_key sdate_ key, t.date_key tdate_key 

, s . t ran s type key st ranstype_key , t . transtype_key ttranstype_key 

, s . customerbillto_key scustomerbillto_key, t . customerbillto_key tcustomerbillto_key 

, s . product_key sproduct_key, t . product_key tproduct_key 

, s . application__key sapplication_key, t . application_key tapplication_key 

, s .program_key sprogram_key, t . program_key tprogram_key 

, 3 . customer shipto^key scustomershipto_key, t . customershipto_key tcustomershipto_key 

, s . territory_key sterritory_key, t . territory_key tterritory_key 

, s . warehouse_key swarehouse_key, t . warehouse_key twarehouse_key 

, s.net_jDrice snet_price, t.net_price tnet_price 

, s . number__units snumber_units, t .number _units tnumber_units 

INTO Order_0_NFD 
FROM 

0rder_0_MFL s, Order_0_MFL t 

WHERE 

s.iss “ t.iss AND s.ss_key *■ t.ss_key 

AND 

s.date_key *« (SELECT MAX (date_key ) FROM Order — 0_MFL u WHERE 
u.iss - s.iss AND u.ss_key m s.ss_key AND u.date_key < t.date_key) 

— #BLOCK END# MakeNFD 


— Insert BOOKS for deltas with same dim keys 

— If the dimensions don't change then we create a 

— new booking order (as long as at least one of the facts 
-- have changed) 

— I DM : Insert Delta More 

/***************************************■*■**★******************★*********************/ 
— # BLOCK BEGIN# MakelDM 


SELECT 

tiss iss, 
tss_key ss_key, 
tdate_key date_key, 
ttranstype_key transtype_key, 

0 seq 

, tcustomerbillto_key cus tome rbillto_key 

r tproduct_key product_key 

f tapplication_key application^key 

, tprogram_key program_key *" 

, tcustomershipto_key cu3tomershipto_key 

t tterritory_key territory_Jcey 

, twarehouse_key warehouse_key 

, tnet_price-snet_price net_price 

, tnumber_units-snumber_units number_units 

INTO Order_0_IDM 
FROM 

Order_0_NFD d 

WHERE 
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(sterri tory_key = tterri tory_key ) AND 
(scus tomershipto_key => tcustomershipto_key) AND 
(swarehouse_key » twarehouse_key) AND 
(sprogram_key *» tprogram_key) AND 
(sapplication_key = tapplication_key ) AND 
(sproduct_key » tproduct_key ) AND 
(scustomerbillto_key « tcustomerbillto_key) 


(snet_price <> tnet_price> 
(snumber_units <> tnumber units) 


--#BLOCK END# MakelDM 


— Insert negative BOOKS for deltas with different dim keys 

If one of the dimensions change then we first create a lose transaction for 
all the previous facts. (Negate all the facts from the earlier of the two 

— transactions) 

— ILM: Insert Lost More 


BLOCK BEGIN# MakeILM 


siss is 3 / 
sss_key ss_key # 
tdate_key date_key, 
stranstype_key transtype_key, 

0 seq 

, scustomerbilltojcey customerbillto_key 

, sproduct_key product_key 

, sapplication_key application_key 

t sprogram_key program_key 

t scustoraer3hipto_key customershipto__key 

t sterritory_key territory_key 

* swarehouse_key warehouse_key 

t -snet_price net_price 

t -snumber_units nuinber_units 

INTO Order_0_ILM 
FROM 

Order 0 NFD d 


. (sterritory_key <> tterritory_key ) OR 
(scustoraershipto_key <> tcustomershipto key) OR 
(swarehouse_key <> twarehouse_key) OR . T 
(sprogram_key <> tprogram_key) OR 
(s applies tion_key <> tapplication_key) OR 
(sproduct_key <> tproduct_key) OR 
(scustomerbillto_key <> tcustomerbillto_key) 


(snet_price <> 0) 
(snumber units <> 0) 


BLOCK END# MakeILM 
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-- Insert BOOKS for deltas with different dim keys 

— When a dimension key changes then we can simply insert all the new facts with the 
-- new dimension keys 

— Note that seq “ 1 here because this is the second transaction on this date for 

— this order. 

— IRM: Insert Rebook More 
BLOCK BEGIN# MakeIRM 


SELECT 

tiss iss, 
tss_key ss_key, 
tdate_key date_key, 
ttranstype_key transtype_key, 

1 seq 

, tcustomerbillto_key customerbillto_key 

» tproduct_key product_key 

» tapplication_key application_key 

# tprogram__key program^key 

, tcustomershipto_key customershipto_key 

, tterritory_key territory_key 

, twarehouse_key warehouse_key 

, tnet _price net_price 

, tnumber_units number_units 

INTO Order_0_IRM 
FROM 

Order__0_NFD d 

WHERE 

( 

(sterritory_key <> tterritory_key) OR 
(scustomershipto_key <> tcustoraershipto_key) OR 
(swarehouse_key <> twarehouse_key) OR 
(sprogram_key <> tprogram^key) OR 
(sapplication_key <> tapplication_key) OR 
(sproduct_key <> tproduct_key) OR 
(scustomerbillto_key <> tcustomerbillto_key) 

) 

AND 

( 

(tnet_price <> 0) 

OR (tnumber_units <> 0) 

) 

~#BLOCKJEND# MakeIRM 

/***-**«*****#**#** + «*** + * + + **»* + *** ** **♦*’*****#*«-**»-»*#» + *»#*********#»#************/ 
— Delete the output tables 

/* * **************** *****»*****+******•* * ** * a****************************************/ 

--#BLOCK_BEGIN# DropOutput 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id « ob j ect_id ( ' dbo .Order_0_B ' ) AND sysstat & Qxf - 
3) DROP TABLE Order_0_B 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id *= obj ect_id ( *dbo.Order_0 INC*) AND sysstat & Oxf 
« 3) DROP TABLE Order 0 INC ~ 


--# BLOCK J2ND# DropOutput 

— Create FC table in case force close was 
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-- not run 

/"*"•**"*""”***. — — — 

--#BLOCK_BEGIN# MakeFC 
DECLARE @ f c exists INT 


SELECT 0fc_exists = ( 

SELECT COUNT (1) 

FROM sysobjects 
WHERE 

id - objected ( *dbo.Order_0_FC • > AND sysstat & Oxf » 3 
) 

IF (0fc_exists - 0} 

EXEC { 1 

SELECT 

* 

INTO Order_0_FC 
FROM 

Order_0_A 

WHERE 

1*0 

M 


— #BLOCK_END# MakeFC 

/*******.****.*.******** *******.^...**.to****i**t**t.**t** V 

— Create the incremental table 

/******** + **********««**************** *##**♦********♦♦****************#**★#*♦***■****/ 
— #BLOCK BEGIN# MakeINC 


SELECT 

INTO Order_0_INC 
FROM Order_0_TIN UNION ALL 
SELECT * FROM Order_0_IL UNION ALL 
SELECT * FROM Order_0_IR UNION ALL 
SELECT * FROM Order_0_IRD UNION ALL 
SELECT * FROM Order_0_IND UNION ALL 
SELECT * FROM Order_0_IRM UNION ALL 
SELECT * FROM Order_0_ILM UNION ALL 
SELECT * FROM Order_0_FC UNION ALL 
SELECT * FROM Order_0_IDM 

— #BLOCK_END# MakeINC 

/***.*0******.***********f *.t********.*****M # . tM *,f*,*.***f*** 

— CR158: We want to load _IMI table and still keep the non-descending 
: — order so that the clustered index on a fact table can be created 

— without sorting. This way can speed up significantly in creating a 

— clustered index on a very large already sorted fact table. 

/***’***-****#*+**** + + *** + -»«-* + *4. + * 1 t*«* + »*#*** ******»+**** + .*«.*.*******«.***.' 

— #BLOCK__BEGIN# MakelMI 


SELECT 

INTO Order 0_IMI 
FROM Order~0_A 

WHERE date key >° (SELECT MIN (date key) FROM Order 0 INC) 


/ 


/ 
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— Create the new fact table and incremental table 


— Note that transaction tables must be built before 
-- these statements are run 


— #BLOCK_BEGIN# MakeNewFact 


SELECT * 

INTO Order_0_B 
FROM Orde r~0_A s 

WHERE s.date_key < {SELECT MIN (date key) FROM Order 0 INC) 
UNION ALL ” 

SELECT * FROM Order_0_IMI 

— #BLOCK_END# MakeNewFact 


— Count processed, inserted rows 


— #BLOCK_BEGIN# SPResults 
DECLARE 9count_INC INT 
BEGIN 

SELECT 0count__INC ** ( 

SELECT COUNT (1) 

FROM Orde r_0_ INC 

) 

INSERT INTO adapt ive_teraplate_prof ile (token name, number_rows) 

SELECT 'PROCESSED', COUNT (1) FROM Orde r_Oj*FL 

INSERT INTO adaptive_template__prof ile ( token__name, number__rows) 

SELECT 'INSERTED', @count_INC - COUNT ( 1 ) FROM Orde r_0_T IN 

END 

--#BLOCK_END# SPResults 

/**««*****»*»******t***********«*****t**»*************************t / 

-- Set join order for SQL Server 

--#BLOCK_BEGIN# ForcePlanOff 
SET FORCEPLAN OFF 
--#BLOCK__END# ForcePlanOff 

n «*»*** r : ««« » 
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uernp tduj.es ana txn ana tin table 

/*** , ******* # ****** , *****************i r ************** ♦.♦****♦** 


— $BLOCK__BEGIN# DropTempsAf ter 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
» 3) DROP TABLE Order_0_TIN 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
“ 3) DROP TABLE Order_0_TMI 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
3) DROP TABLE Order_0_FC 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
= 3) DROP TABLE Order JD_TXN 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
3) DROP TABLE Concat_MFL 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
“ 3) DROP TABLE Order_0_lST 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
3) DROP TABLE Order_0_IL 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
3) DROP TABLE Order_OJTR 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 

- 3) DROP TABLE Order_0_IRD 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 

- 3) DROP TABLE Order_0_IND 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
“ 3) DROP TABLE Order_0_NFD 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
« 3) DROP TABLE Order 0 IRM 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 

- 3) DROP TABLE Order_0_IDM 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 

- 3) DROP TABLE Order_0_ILM 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
« 3) DROP TABLE Order_0_IMI 


objected ( *dbo.Order_0_TIN* ) AND sysstat & Oxf 
object_id ( 1 dbo. Orde r_0_TMI ' ) AND sysstat & Oxf 
objected { 'dbo. Order_0_FC ' ) AND sysstat & Oxf » 
objected ( 'dbo.Order_0_TXN ' ) AND sysstat 6 Oxf 
objected ( 'dbo. Concat_MFL* ) AND sysstat & Oxf - 
object_id ( ' dbo . Order_0_lST* ) AND sysstat & Oxf 
objected ( 'dbo. Order_0_IL’ ) AND sysstat & Oxf ~ 
object_id ( 'dbo. Order_0_IR' ) AND sysstat & Oxf = 

AND sysstat & Oxf 
AND sysstat fi Oxf 
AND sysstat & Oxf 
AND sysstat & Oxf 
AND sysstat & Oxf 
AND sysstat & Oxf 
AND sysstat & Oxf 


ob j ect_id ( * dbo . Order J)_IRD ' ) 
ob j ect_id ( * dbo . Orde r_0_IND * ) 
objected ( 'dbo. Orde r_0_NFD* ) 
objected ( 'dbo. Orde r_0_IRM' ) 
objected ( ' dbo . Orde r_Q — I DM ' ) 
ob j ect_id ( ' dbo . Order_0_ILM ' ) 
ob j ect_id ( • dbo . Orde r_0_IMI ' ) 


— #BLOCK_END# DropTemps After 

--#TEMPLATE_END# load_state 
— #TEMPLATE_BEGIN# load_trans 

/******* ******************************************************* *****#***•***••*«•«** f 


— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

-- load_trans 

Move transaction-like staging data into Fact table - create a temp 

-- table with TXN extension that has all old rows along with new rows. 

-- Also produce a TIN (TXN INC) table that has only the new rows 

-- Note that the new table will also include all existing rows from 

— the Fact table. 

Y»»t***»«M*«*t,t,»«t»*irt*t***i*i»*i****»«*4*»*tt,t***«t*«t**4****«*««t*4**«i***0^ 

/*****************★****♦****♦**********«*************************** *************** ^ 
; — Delete output tables 

-- Output table is called TXN and includes old and new rows 

-- Also, leave around _TIN as incremental table from this 

— procedure 

-- We also create a table called _TMI which contains all the 
““ _TIN records plus the records of overlapping period from the 
-- old existing fact table. 

/*************************************★**★»******* ************■***************♦****/ 
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--#BLOCK_BEGIN# RemoveOutput 


IF EXISTS (SELECT X FROM sysobjects WHERE id - ob j ect_id ( 1 dbo . Order 0 TXN • ) AND sysstat & Oxf 
- 3) DROP TABLE Order_0_TXN 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id » obj ect_id ( 1 dbo . Order 0 TMI 1 ) AND sysstat & Oxf 
» 3) DROP TABLE Order_0_TMI 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = ob j ect_id (' dbo . Order 0 TIN') AND sysstat & Oxf 
= 3) DROP TABLE Order 0 TIN 


--#BLOCK_END# RemoveOutput 

w 

— Set join order for SQL Server 

--#BLOCK_BEGIN# ForcePIanOn 
SET FORCEPLAN ON 
- - # BLOCK_END# Force PlanOn 

/*****♦******+***************************************•******★******************★***/ 

— Remove stuff already in fact table 

— Note that currently this filter implies that once a transactional 

— fact entry is made it cannot be changed - and no further fact 

— entries on that date or any previous date can be made either 

******************♦***/ 

— #BLOCK BEGINS CreateTIN 


SELECT 

s . iss, 
s .ss_key, 
s , date_key, 
s . transtype_key, 
s.ikey seq 

, s .custoraerbillto_key 

, s . product_key 

, s . application key 

, s . program_key 

, s . cus tome r shipt o_key 

, s . territory key 

, s . warehouse_key 

, s.net_price 

, s .number_units 

INTO Order_0_TIN 
FROM 

OrderStage_MAP s, bus_process b 

WHERE 

NOT EXISTS (SELECT * FROM Order 0 A f WHERE 


s .iss - f .iss AND 
s.ss_key « f.ss_key AND 
f. date key >~ s.date key) 
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- - # BLOCK_BEGIN # ForcePlanOff 
SET FORCEPLAN OFF 
--#BLOCK_END# ForcePlanOff 

-- CR158: We want to load _TMI table and still keep the non-descending 
-- order so that the clustered index on a fact table can be created 
-- without sorting. This way can speed up significantly in creating a 
— clustered index on a very large already sorted fact table. 
/***************+*******************+*******#******»★***♦*****************•******#*/ 

— #BLOCK BEGIN# CreateTMI 


SELECT 

* 

INTO Order_0_TMI 
FROM 

Order_0_A 

WHERE 

date_key >= (SELECT MAX (datejcey) FROM Order_0_TIN) 
UNION ALL 
SELECT 

* 

FROM 

Order_0_TIN 
ORDER BY 

date_key 

, customerbillto_key 

, product_key 

, application__key 

, prograro^key 

, customershipto_key 

, territory_key 

, warehouse_key 


- - #BLOCK_ENDl CreateTMI 

/* + **************************★** + *************•********************************* + •*★/ 
— Insert everything into the new fact table 

/*-*************** + *«***+****+*** + **#***+* + ** + *«*-* + + *** + »»*** + **** + ** + ** 4 ****#*****/ 

— # BLOCK BEGIN# CreateTXN 


SELECT 

# 

INTO Order_0_TXN 
FROM 

Order_0_A s 

where s .date key < (SELECT MAX <date_key) FROM Order_0 TIN) 

UNION ALL ~ 

SELECT 

* 

FROM 

Order_0_TMI f 
-- #BLOCK_END# CreateTXN 

/#**•***-»******* + *#**»****# + ***** + *****#********** + ** # * +****+#*#»#•***+******+*+*# f 

-- Count inserted data and put results into communication table 

/*****+*********#*****»#++*******+*+**#+********+•*** * * t**t«t********************* / 

— #BLOCK_BEGIN# SPResults 
BEGIN . 
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INSERT INTO adaptive_template_prof il e ( token_name, number rows) 

SELECT 'PROCESSED', COUNT (l) FROM OrderStageJiAP 

INSERT INTO adaptive_template_prof ile ( token_name, number__rows ) 

SELECT 'INSERTED', COUNT (1) FROM Order_0_TIN 

END 

— #BLOCK_END0 SPResults 
--#TEMPLATE_END# load_trans 
--8TEMPLATE_BEGIN# index_fact 

/* + ** + * ********** + *******»***■***•*•*************♦****■***•#**#***#******#**«*••*******■*■»#** f 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— Post processing after an extraction run 

— Reindex fact tables 

-- CR158: added WITH SORTED_DATA in creating cluster index on fact table 
-- Remove any temp tables generated during the extraction 

/A**********#***********#**********.*******************************#**'***'********##**** y 

/****••**•********* + *#*******-*•****•*•*******•***** + *********** + ** + ***»****»*#****.#»**/ 

— Primary key index the fact table 

/**♦***«********#*******«-** + * + ****** + ***«*»***************#**•*****•** + ***********»**-**/ 
--#BLOCK_BEGIN# PKIndexFact 


EXEC ( ' 

CREATE UNIQUE INDEX XPKOrder_0 B ON Order 0 B 

< 

iss , ss_key , date__key , transtype key , seq 
) ~ 

*> 


- - # BLOCK_END# PKIndexFact 

/******♦*******************♦******★****+♦**★****#******************★******************/ 
— Inversion index the fact table 

/*♦******************************************************★****•*******************■*****/ 
--#BLOCK_BEGINI IEIndexFact 


EXEC ( ' 

CREATE CLUSTERED INDEX XIEKOrder 0 B ON Order 0 B 
( ~ 
date_key 

, customerbillto_key 

, product_key 

, application_key 

, program_key 

, customershipto_key 

, territory_key 

, warehouse_key 

> WITH SORT ED_DAT A 

’) 


--SBLOCK END# IEIndexFact 
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yt*****»*##*****t»t*******»*****tt***»»»*t**«*t******t******»»**t»#*«t I***************/ 

— Remove any mapped tables 

/*”** ******************** ****** ****************************************/ 

— #BLOCK_BEGIN# ReraoveTemps 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id - object id (' dbo . Orders tage__MAP ' ) AND sysstat & 
Oxf ° 3) DROP TABLE Orders tage_MAP 


— #BLOCK_END# ReraoveTemps 

— #TEMPLATE_END# index_fact 
--#TEMPLATE_BEGIN# ren_trans 

/**********♦■****************** + **********************♦******************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— ren_trans 

— Epiphany Marketing Software, 1997 

— Simply change the name of the transaction new table to the 

— actual fact table name - used for Fact tables that don't have 

— any stored procedure other than load_trans attached to them 

,*************** ****** ****** ************************, 

*********************** *********************/ 

— Delete the output tables 

/”*** ******************************** ***********************/ 

--# BLOCK_ BEGIN# ReraoveOutput 


IF EXISTS (SELECT I FROM sysobjects WHERE id - objected (' dbo. Order 0 B'> AND sysstat & Oxf « 
3) DROP TABLE Order_0_B 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id - objected ('dbo. Order_0 INC') AND sysstat & Oxf 
- 3) DROP TABLE Order 0 INC 


--#BLOCK_END# RemoveOutput 

/♦*********♦************************************************************/ 
-- Move all transaction rows into the correct new fact table 
name. Note that we would use sp_rename, except it 
— doesn't work with DB name prefixes 

-- TBD: Rename instead of re-select 

/******•" ****.****************************************************/ 

— # BLOCK BEGIN# BuildNawFact 


SELECT 

* 

INTO Order_0_B 
FROM 

Order_OJTXN 

— #BLOCK_END# BuildNewFact 

/************************ *********************************************** j 

-- Preserve incremental table 

/it**********************************************************************/ 

— #BLOCK BEGIN# Buildlncremental 
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SELECT 

* 

INTO Order 0 INC 
FROM 

Order 0 TIN 


- - # BLOCK_END# Buildlncremental 

/#*******«***#***#**** + +%** + **** + *«»« w# »** + *****.t4.*** A .***** + ***#»*»##«-**/ 

-- Count inserted data and put results into communication table 

/******♦********************************»******** * * ********************* y 
BLOCK BEGIN# SPResults 


BEGIN 


INSERT INTO adaptive_template_prof ile (token name, number rows) 

SELECT 'PROCESSED', COUNT (1) FROM Order_0_TXN 

INSERT INTO adaptive_template__prof ile (token_name, number rows) 

SELECT 'INSERTED', COUNT (1) FROM Order_OjTXN 

END 

— #BLOCK_END# SPResults 

^********»**»***«*»**t***t**t*»****#***«»t**»*#***t*»*****************«*^ 

— Remove temp tables 

/***************. **************************.**.*****.y 

— #BLOCK_BEGIN# RemoveTemps 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id - object id (' dbo . Order 0 TXN ' ) AND sysstat & Oxf 
* 3) DROP TABLE Order_0jTXN ” 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id - obj ect_id (’ dbo . Order 0 TIN') AND sysstat & Oxf 
■* 3) DROP TABLE. Order_0_TIN 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id - obj ect_id (* dbo . Order 0 TMI ' ) AND sysstat & Oxf 
- 3) DROP TABLE Order .0 TMI 


— #BL0CK_END# RemoveTemps 

— #TEMPLATE_END# ren_trans 
--#TEMPLATE_BEGIN# map_keys 

/***** + *★**•************★*********★*********************★***********/ 

-- Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 
-- map_keys 

-- Epiphany Marketing Software 

-- Map dimension keys from Staging table and report 

— on unjoined rows 

/************ ******************* **.**********************/ 



— Remove output table 

/************************************************★***************** y 
~~#BLOCK_BEGIN# DropTemp 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id “ object id! ' dbo. OrderStage_MAP ' ) AND sysstat & 
Oxf “ 3) DROP TABLE OrderStage_MAP 
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--#BLOCK_END# DropTemp 

/♦**#***t*****»** + ********#***** t# + ********** M0t(l ^ tti#0 * # ** ### , y 

-- Set join order for SQL Server 

y»*t*****»******»***t*«**ti**»«*t**************»* t **t**»********«**/ 

~-#BLOCK_BEGINft ForcePlanOn 
SET FORCEPLAN ON 

— ft BLOCK_£ND# ForcePlanOn 

* *** * ********** 

— Map dimension keys via Inner joins 

****************.*** w ****.**.**. # **.*.*. w# *.*** #/ 

— #BLOCK_BEGIN# MapAll 


SELECT 

s.iss, 

s . ss_key, 

s . date_key, 

s . transtype_key, 

s.ikey, 

s . process_key 

, m_04 ,program_key program_key 

t ra_03 . application_key application_key 

* ra_06. territory_key territory_key 

, m_02 . product_key product__key 

, m_05 . customer_key customershipto_key 

, m_01.customer_key cus tomerbillto_key 

, ra_07 . warehouse_key warehouse_key 


, s.net_price 

, s . number _units 

INTO OrderStage_MAP 
FROM 

OrderStage s 

, ProgramMap_B m_04 (index « 1) 

, ApplicationMap_B m_03 (index « 1) 

, Terri toryMap_B m_0 6 (index « 1) 

, ProductMap_B ra_02 (index ° 1) 

, Cus tome rMap_B m_05 (index « 1) 

, CustomerMap_B m_01 (index = 1) 

, WarehouseMap^B m_ 07 (index - 1) 

WHERE 1=1 

AND m__ 04.iss *° 3.iss AND in_04 . program_sskey =* s .program_sskey 

AND m_03.iss «* s.iss AND m_03 . application_ss key ™ s . application^sskey 

AND m_06. iss ** s.iss AND m__06. territory^sskey *= s. territory sskey 

AND m — 02.iss *= s.iss AND ro_02 . produces s key » s . product_s s key 

AND ra_05.iss » s.iss AND m^OS . cus tome r_ss key = s .customershipto_sskey 

AND m_01.iss = s.iss AND m_0 1. cus tome r_ss key '■ s .customerbillto__sskey 

AND m__07.iss « s.iss AND m_07 . warehouse_ss key «* s . warehouse^ sskey 

--#BLOCK_ENDft MapAll 

/**«-************ + + #**** + *#****** + * + ♦#******♦**•**-******** + **#** + ** + */ 

-- Set join order for SQL Server 

^***»»»t**>#***»*«**«tii***t*t*********t****»**«****t*«*«**4********/ 

— #BLOCK_BEGINft ForcePlanOff 

SET FORCEPLAN OFF 

-- ft BLOCK END# ForcePlanOff 
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• * **“**** ..../ 

— Look for unjoined data. Report on processed rows 

/************«**************« + * + + + + + + * + ****#* + **** + *» + * # »#*#*** t *** ^ 
-~#BLOCK BEGIN# SPResults 


DECLARE ©unjoined INT 
DECLARE Gprocessed INT 


SELECT Gprocessed ■» ( 
SELECT COUNT (1) 

FROM OrderStage 


SELECT Gunjoined - ( 

SELECT Gprocessed - COUNT (1) 

FROM Order Stage_MAP 


INSERT INTO adaptive_template_prof ile ( token_name, number_rows) 
SELECT ’UNJOINED', ©unjoined 

INSERT INTO adaptive_template_ prof ile (token_naroe, numbe r_rows ) 
SELECT 'PROCESSED', ©processed 

INSERT INTO adaptive_template_prof ile { token_naroe, number_rows) 
SELECT 'INSERTED', ©processed - ©unjoined 


— # BLOC K__EN D # SPRe suits 

/•*»**** *******+**********+*+***+*+*»++**« ******* 
-- Index this temp table 

/*.^**.****t**.***********************.t*******. 

--#BLOCK_BEGIN# IndexMap 
EXEC ( ' 

CREATE INDEX XOrderStage_MAP ON OrderStage_MAP 

< 

iss, ss_key, date_key, ikey 


- - # BLOCK_END# IndexMap 

-~#TEMPLATE_END# map^keys 
--#TEMPLATE_BEGIN# upd_unj 

/*'♦* **♦*********♦******♦***************************************, 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved 

— upd_unj 

-- Epiphany Marketing Software 

-- Update all dimension keys to 'UNKNOWN' in staging table 
-- where referential integrity fails 

/ A********************************************************************/ 
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/************* + ********* + **'fc*************.***********»*#******** + * 1r *.***^ 

-- Count the number of rows to update in the staging table - that is, those 

— that have at least one Foreign key where referential integrity fails 
/*****•»•***************************★*•**********•*♦**#***★**************/ 

— #BLOCK__BEGIN# CountUnj 
BEGIN 

INSERT INTO adaptive_template_prof He (token_name, number_rows) 

SELECT 'PROCESSED’, COUNT (1) FROM OrderStage 

INSERT INTO adaptive_template_prof ile (token_name, number_rows ) 

SELECT 'MODIFIED', COUNT (1) 

FROM 

OrderStage s 
WHERE 1=0 

OR NOT EXISTS (SELECT 1 FROM ProgramMap_B m_04 WHERE raj)4.iss = s.iss AND mJQA . program_sskey = 
program_sskey) 

OR NOT EXISTS (SELECT 1 FROM ApplicationMap_B m_03 WHERE m_03.iss = s.iss AND 
m_03 ,application_sskey « application_sskey) 

OR NOT EXISTS (SELECT 1 FROM Ter ritoryMapJB ra_06 WHERE m_06.iss - s.iss AND 
m_06. territory_sskey «= territory_sskey) 

OR NOT EXISTS (SELECT 1 FROM ProductMap_B m_02 WHERE ra_02.iss = s.iss AND m_02 . produces skey = 
produces skey) 

OR NOT EXISTS (SELECT 1 FROM CustomerMap_B m_05 WHERE m_05.iss - s.iss AND m_05 . customer^ skey 
*» customershipto_sskey) 

OR NOT EXISTS (SELECT 1 FROM CustomerMap_B ra_01 WHERE m_01.iss - s.iss AND m_01 . customer's skey 
= customerbillto_sskey) ~ 

OR NOT EXISTS (SELECT 1 FROM WarehouseMap_B m_07 WHERE m_07.iss - s.iss AND 
m_07 .warehouse's skey « warehouse_sskey) 

END 

— #BLOCK_END# CountUnj 

— Update foreign keys where referential integrity fails 

/*** * * ** *•*********************♦•*•********♦*/ 

— #BLOCK_BEGIN# UpdateUn jprogram_sskey 

UPDATE OrderStage SET prog ram_s skey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM ProgramMap_B m 

WHERE m.iss « OrderStage .iss AND m. prograra_sskey - OrderStage .program_sskey) 

— #BLOCK_END# UpdateUn j prog ram_s skey 

— # BLOCK^BEGIN# UpdateUn j application's skey 

UPDATE OrderStage SET application_sskey « 'UNKNOWN* 

WHERE NOT EXISTS (SELECT 1 FROM ApplicationMap_B m 

WHERE m.iss - OrderStage . iss AND m. application_sskey » OrderStage . application_s skey) 

--|block_end# UpdateUn j application's key 

--#BL0CK_BEGIN# updateUnj territory_sskey 

UPDATE OrderStage SET territory_sskey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM Terr itoryMap_B m 

WHERE m.iss = Orders tage . iss AND m. territory_sskey «* OrderStage . territory_sskey ) 

- - # BLOCK_END# UpdateUnj ter ri tor y_ss key 

--#BL0CK_BEGIN# UpdateUn jproduct_sskey 

UPDATE OrderStage SET product_sskey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM ProductMap_B m 

WHERE m.iss » OrderStage . iss AND m. product~sskey = OrderStage .product_sskey) 

— K BLOCK END# UpdateUnjproduct sskey 
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— #BLOCK_BEGINft Upda t eUn j cus tomer ship to_ss key 

UPDATE OrderStage SET customershipto_sskey ** 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM Cus tome rMap_B m 

WHERE m.iss = OrderStage . iss AND ra.customer_sskey D OrderStage . customershipto_sskey) 
-~#BLOCK_END# UpdateUn jcustomershipto_sskey 


— #BLOCK_BEGIN# Upda teUnj cus tome rbil It o_ss key 

UPDATE OrderStage SET custoraerbillto__sskey ■ 'UNKNOWN* 

WHERE NOT EXISTS (SELECT I FROM CustomerMap_B m 

WHERE m.iss - OrderStage . iss AND m . cus tomer~sskey ® OrderStage . customerbillto_sskey) 

— #BLOCK_END# UpdateUn j cus tomerbillto_sskey 

— #BLOCK_BEGIN# UpdateUn j warehouse_ss key 

UPDATE OrderStage SET warehouse sskey « ’UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM WarehouseMap_B m 

WHERE m.iss ** OrderStage . iss AND m. warehouse's s key » OrderStage . warehouse_sskey) 

— #BLOCK_END# UpdateUn j warehouse's skey 


— #TEMPLATE_END# upd_unj 


Note, additional semantic types and adaptive templates can be imported into the system 100. 





